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PREFACE 



This book is a welcome mat for the Intellec Series III Microcomputer Development System. It is 
also an introduction to the world of software development for micro-applications. We assume 
that you have some basic knowledge of microprocessors and their applications, but few 
demands are made on that knowledge. We do not assume that you have had exposure to any 
particular programming language. This book can be useful to beginners, and even 
sophisticated readers should find it rewarding to skim through. 

This book is a tutorial for using the Series Ml system, especially the "8086 side" of it (the 8086 
execution environment). The "8085 side" is similar to a Series II system, which is described in 
A Guide to Intellec Microcomputer Development Systems by Daniel McCracken. 
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micro-application: a climate control system for a building. To keep the example easy to 
understand, we only describe the software development effort, assuming that the hardware for 
the climate system is being developed simultaneously. In fact, we illustrate some typical prob- 
lems in software development that occur as a result of changing hardware designs. 

Chapter 1 gives an overall view of the Series III system and the application example. It also 
describes top-down design, stepwise refinement, modular programming, design considera- 
tions, and how to choose the proper software language for each module. 

Chapter 2 is a step-by-step tutorial on the Series III operating system, showing typical 
operations. 

Chapter 3 is a step-by-step tutorial on CREDIT, and it incidently shows the process of stepwise 
refinement of the annijcation's main control alnorithm. 

Chapter 4 describes Pascal-86 programming, structured and modular design, parameter pass- 
ing, data typing, and the Pascal-86 compiler. 

Chapter 5 describes PL/M-86 programming, and it shows a sample PL/M-86 routine used in the 
application. It also briefly describes the PL/M-86 compiler and the 8086/8087/8088 Macro 
Assembler. 

Chapter 7 describes program debugging with DEBUG-86 and hardware emulation with the 
ICE-88 emulator. 

There is also a bibliography of related material, and a list of Intel manuals supplied with the 
Intellec Series III Microcomputer Development System. 
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CHAPTER 1 
THE SOFTWARE DEVELOPMENT PROCESS 



"Hardware is computing potential; it must be harnessed and driven by software to be useful." 

-Andrew S. Grove, President of Intel Corp. 



The Intellec Series III Microcomputer Development System is more than a keyboard, a video 
display, an integral disk drive, and a box with two microprocessors. It is a useful tool for 
designing microcomputer software for the iAPX 86,88 processor family or for the 8080/8085 pro- 
cessors. You can choose the appropriate ianguage (PL/'M, FORTRAN, Pascal, macro- 
assembiy ianguage) for each piece of software, debug these pieces separately, and link them 
in different ways for different applications. The applications can then be run on this system or 
any other system that is based on the iAPX 86,88 or 8080/8085 families of processors. 

Intel's iAPX microprocessor family provides an architecture best suited for modular software 
development using high-level languages. The Intellec Series III Microcomputer Development 
System takes full advantage of this architecture to provide a more cost effective programming 
environment that guarantees a shorter development cycle. 

To design a product that will contain a microprocessor, you must coordinate two efforts: the 
design of the hardware that surrounds the microprocessor, and the design of the software that 
controls the microprocessor. Hardware development involves planning the interaction of the 
microprocessor, the associated memory and peripheral circuits, and the specialized 
input/output circuits and processors. Software development involves programming the 
microprocessor with instructions that will eventually be stored in the product's memory. 
These instructions must be designed to correctly perform the required tasks. 

It is possible to carry out these development efforts independently-the hardware develop- 
ment separate from the software development. In practice, however, it takes a long time to 
develop error-free software on prototype hardware. To achieve good system integration and to 
save time, software debugging must usually begin long before prototype hardware is available 
to test the software. 

The Intellec Series III with in-circuit emulation (ICE) is a development solution because it pro- 
vides support for parallel hardware and software development efforts. Using the ICE-86 or 
ICE-88 emulator, you can emulate parts of your prototype hardware in order to test your soft- 
ware in a stable environment that resembles your final product. The ICE-86 or ICE-88 emulator 
also allows you to substitute memory and other resources from the Series III system for the 
memory and resources missing in your prototype hardware. With the ICE-86 or ICE-88 
emulator, prototype hardware can be added to your product as you are designing it, and soft- 
ware and hardware testing can occur simultaneously (thereby speeding up the entire develop- 
ment process). 
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The chart in figure 1-1 summarizes a software development process, starting with an idea for a 
final product. Such a process always starts with an idea, which you refine step by step until 
you can define the actual product's environment, hardware, and logic. 

To provide a tutorial on using the Intellec Series III system, and to show how Intel's software 
development tools are used in a development situation, we provide a simple software applica- 
tion for the iAPX 88 microsystem, at the heart of which is an 8088 microprocessor. The applica- 
tion is a climate control system for a building that uses a solar collector for heating and cool- 
ing, with backup methods of heating and cooling when the solar collector is not adequate. All 
methods use water, storage tanks, and a water-to-air exchanger or heat pump. 
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Figure 1-1 . Developing Software on the Series III System 



SOFTWARE DEVELOPMENT PROCESS 

Several decisions about this climate control system can be deterred to a later date. For exam- 
ple, by designing the system's software in a modular fashion, we can add more methods of 
heating or cooling as necessary, and we can decide how to handle water pumps and valves at a 
later date. We know now that the software's primary purpose is to choose a method of heating 
or cooling based on temperature data, and to operate the climate system's pumps and valves. 
Figure 1-2 is a simplified block diagram of the application. 

DEFINING THE PRODUCT'S SOFTWARE 

As you define your product's hardware, you must also define the purpose of its software. For 
example, the purpose of the software for our application is to gather and store the appropriate 
temperature data, decide on a heatinn or cooling method based on that data, implement the 
method in the climate system, and maintain the operation of the climate system. Each task can 
be designed as a piece of software called a module. By keeping tasks modular, you can 
change the details of any task without affecting the details of the other tasks. 

Keep in mind that software provides the capability to change or add to the product. The entire 
product could consist of hardware and logic circuits, but then you might have to rebuild each 
unit to add more capabilities or change the flow of the logic. Software that is not modular and 
easy to maintain does not solve this problem; therefore, you must define the entire purpose of 
the software, with an eye to the future of your product. Keep it modular so that you can replace 
modules easily without rewriting modules that already work. 

For our climate control system, we defined the software to be a set of modules that receive and 
store data, decide heating or cooling methods based on that data, and decide how to operate 
the hardware associated with the climate system. 

At this time, we do not need a more detailed definition; in fact, more detail would hinder our 
process of step by step refinement. It is important to realize the order for these actions: first, 

tho cnfh«/aro hac tft etart lin +ho olimafp euefam f\r\f*c* otarf^irl +h£i enftiiiara hae tr\ rlr\ eoimrol 

tiiv v^mlGi v i iww iv Oiw i U K ll ' ,v * «""'ulO w j \> iv i ■ i . vnvC wl€til\sVJ, *ifv OViUVUIb IIMd IV Ov v€*&iai 

things over and over (unless the system shuts down): (1) read the various temperatures, (2) 
store the data for future reference, (3) decide on a heating or cooling method to use, and (4) 
operate the climate system to provide heating or cooling and to maintain the system (e.g., 
maintain heat gain). 
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CHAPTER 1 



A good software definition breaks the problem into solvable tasks. The order in which these 
tasks must occur also determines the structure of the software. If the structure is simple to 
understand, it will be that much easier to implement and maintain. 

A Nassi-Shneiderman Chart (shown in figure 1-3) is useful for showing structured blocks of 
software. Use whatever charts you find useful, but hide many of the details so that you are not 
locked into doing things a certain way. In our application, we hid all details about data types, 
input and output, and actual heating or cooling methods. It is most important that we design 
each module to be self-reliant; that is, a module should not have to know about details hidden 
in another module, especially details that might change in the future. 
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SOFTWARE DEVELOPMENT PROCESS 

CHOOSING THE SOFTWARE DEVELOPMENT TOOLS 

It is unfortunate but common in this industry to find software development systems sorely 
lacking in the tools of the trade. There are some systems that force you to put together a whole 
program in the limited space they allow, and they don't provide the facility to create a library of 
canned routines that you could use with many different programs. 

The Intellec Series III system provides both the ability to put together partial programs, and the 
facilities to build libraries of routines that you can link to different programs. The concept of 
module is inherent in this system. Whenever you build a partial program, it is a module; and 
the module can refer to procedures, functions, and variables in other modules found in 
libraries. 

For our application, we do not have to decide on one programming language— the Intellec 
Series III system supports several, including the high-level languages PL/M-86, Pascal-86, and 
FORTRAN-86. We can, however, decide whether or not to use modules that already exist, and 
design our application with that decision, or change the decision later and create another 
module to replace it. 

For example, we already have a module written in PL/M-86 that performs a routine to convert 
thermocouple voltage into degrees Celsius. We can decide now to tentatively use it, thereby 
saving time by not coding this routine into our main program. We can also decide, at a later 
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does not have to be made until the main program is finished! 

By choosing the right tools you can save time and defer decisions on specific details until you 
are ready to deal with the details. By deferring such decisions, you keep your software 
development effort from becoming too cluttered with rigid design decisions, and you keep the 
effort flexible enough to accept change. 

The right tools are (1) appropriate high-level languages to choose from, (2) a way to manage 
libraries of canned routines, (3) a linker that allows you to link finished (or unfinished) modules 
in different ways for different applications, (4) a locater that will locate programs in memory for 
you, yet give you the opportunity to specify locations for sections of the program, (5) a sym- 
bolic debugger you can use to test modules and partial programs easily, and (6) an in-circuit 
emulator to emulate parts of your final product before they exist. The Intellec Series III 
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LANGUAGES 

When designing a system using top-down techniques, you think in and express concepts in 
the highest-level language possible at each refinement step in order to expose the logical con- 
cepts and conceal the details. 

How can you tell whether you are thinking in a language that is "high-level"? A language is 
"high-level" for a given application if you use it to define the overall structure of the software. 
You use a lower-level language to express in great detail each piece of code. With a high-level 
language you gain a clear understanding of the control structures of the system at the highest 
level, and you expose logical flaws in the structure that would have led to subtle bugs in the 
code. With these advantages in mind, it makes sense to start your programming with the 
highest-level language: English. After you have defined the software in English, you can use a 
high-level programming language like Pascal, which allows you to express more detailed code 
in a language that resembles English. 



CHAPTER 1 



In Chapter 3, we refine our climate control algorithm step by step. We use as a language 
something called Pidgin Pascal, which is really a language of concise declarative English 
sentences. Since our control structures can be translated easily from English into Pascal, we 
decided to use Pascal-86 for our main climate control module (this decision does not have to 
be final). We do not start the translation into Pascal-86 until after we have tested the logic of our 
Pidgin Pascal algorithm. 

Pascal is a language that resembles the control structures of human thought. We don't think in 
terms of GO TO branches normally; we consider a job to be a set of tasks to DO WHILE 
something is true, or to DO UNTIL something is done. IF something is true or false, THEN do 
one thing; ELSE do another thing. In the CASE of several different problems, solve each one 
accordingly. Occasionally we might need a disaster bail-out (GO TO a panic routine), but we 
should be planning our algorithm to take care of disasters elegantly. 

The point is: we should think about control structures of a system as structures, not as 
individual branch statements. Pascal is one language that was designed to express control 
structures; PL/M is another, and some new versions of FORTRAN can be structured 
accordingly. 

Another point should now be obvious: you should choose the language best suited for the 
algorithm. For example, our module that operates the climate system has to manipulate pumps 
and valves to implement a chosen heating or cooling method. This operation module receives 
the data from the decision-making main module written in Pascal. The operation module might 
use bits in a word as control signals to send to the procedure that actually interfaces to the 
hardware of the climate system. 

We can code this operation module in assembly language or PL/M, since both languages can 
easily manipulate bits in a byte or word and respond with appropriate actions based on the 
pattern of bits. Our final decision will be made later; in the meantime, we will use a test version 
of the operation module, until prototype hardware for the climate system is ready. Our test ver- 
sion will be written in Pascal, and it will simply display appropriate test information at the 
console. 

It is most likely that the final version of the operation module will not be written in Pascal, since 
Pascal does not provide bit manipulation operations. We can also guess that the module will 
not be written in FORTRAN-the advantage FORTRAN has over PL/M is its ability to express 
complex mathematical formulas. Our climate control system has no complex mathematical 
formulas. 

We would code the final version of the operation module in assembly language if the applica- 
tion required the most efficient use of processor time and memory; however, PL/M program- 
ming saves development and maintenance time since it is easier to learn and the programs are 
easier to read and maintain. The only drawback to PL/M is that it is not as efficient in time or 
memory, and it cannot compute decimal or real arithmetic. These are not drawbacks in our 
application, since we do not need decimal or real arithmetic, nor do we have severe speed and 
memory constraints. The advantage of saving development time and maintenance costs with 
PL/M far outweigh the advantages of using assembly language. 



MODULAR PROGRAMMING 

The Intellec Series III system has the linking and locating tools to support modular pro- 
gramming, and the library utility to maintain libraries of canned routines. The decisions we 
make at this time are not binding, but they can be very helpful: we can decide now what types 
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of routines will be separated into which modules. We have several design criteria for making 
these decisions. We must be able to (1) write the routines of one module with little knowledge 
of the code in other modules, and (2) reassemble and replace any module without affecting 
other modules. Each module of our climate control system will contain design decisions that 
are hidden from the other modules so that the decisions are not binding. 

With these criteria in mind, we designed our system to have several modules: the GetData 
module gets and stores our data, the Operation module performs the actual climate system 
operation (turning pumps and valves on and off, etc.), and the Main module makes the high- 
level decisions. 

The only binding decisions to be made at this time concern the data passed between modules. 
We try to keep data passing to a minimum, or we try to enforce a data-passing standard that is 
easy to comply with. In our climate system, we only need to pass a reference to a data record 
to the other modules; the other modules must know what to do with the reference. This data- 
passing technique is one of the two we can use: pass-by-reference and pass-by-value, which 
are described in more detail in Chapter 4. 

With the Intellec Series III system capabilities, we can design different versions of the same 
module, test each version, and decide at a later time which version to link with the other 
modules. We can also defer decisions about the physical memory locations (locations in our 
final product's memory) for these modules until after we have debugged our prototype hard- 
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decide physical memory locations; the Intellec Series III locater can decide them for you. 



DEBUGGING AND IN-CIRCUIT EMULATION 

At any time during software development, you can test a compiled module using DEBUG-86. In 
certain cases you will want to alter the module to be self-contained; for example, our main 
module needs the appropriate data from the GetData module, but the GetData module is not 
yet written. We can quickly write a procedure that obtains the data from an interactive session 
at the console, link this temporary data acquisition module to our main module, and test our 
main module using DEBUG-86. 

When we have our modules coded and compiled, we can test the modules in an ICE-86 or 
ICE-88 session that can emulate the final product's processor. We can use an ICE-86 emulator 
if our final product will contain an 8086 processor, or use an ICE-88 emulator if it will contain an 
8088 processor (remember, our iAPX 86, 88 applications software can run on either an 8086 or 
an 8088). 

For example, our data module will read data from ports of an 8088 processor in our final prod- 
uct. The ICE-88 emulator can emulate those ports before we ever have a prototype of the final 
product. Using ICE-88, you can begin testing your software before any prototype hardware 
exists. As portions of your prototype become available, you can use them and still borrow 
resources like memory from your Series III system. 

With in-circuit emulation, you control, interrogate, revise, and completely debug your product 
in its own environment, or in a stable environment that emulates the final product's environ- 
ment. Symbolic debugging is one of the key features of Intellec microcomputer development 
systems and in-circuit emulators. Symbolic debugging allows you to debug your program 
using its own symbols and line numbers— you do not have to convert your symbols to physical 
memory addresses. 
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USING YOUR FINAL PRODUCT 

Intel supplies other tools to help you put together your final product. If you designed your 
product to have its software in ROM (read-only memory), you can use Intel's Universal PROM 
Programmer (UPP) with its Universal PROM Mapper (UPM) software to create the PROM 
(programmable read-only memory) device to hold the software. You can then install your 
device in an SDK-86 or SDK-88 (System Design Kit with an 8086 or 8088 processor), or in an iSBC 
(Single Board Computer) system. 

You can also run your software in other systems, or in dedicated application environments. For 
example, you could transfer your software to RAM (random-access memory) on an SDK-86 or 
SDK-88, or to RAM on an iSBC 86/12A (Single Board Computer system with an 86/12A board), 
by first using the OH86 utility described in the iAPX 86,88 Family Utilities User's Guide for 8086- 
Based Development Systems to convert the program to hexadecimal object format. You would 
then use an appropriate tool to load the software into your execution board (the ICE-86 
In-Circuit Emulator, the SDK-C86 Software and Cable Interface, or the iSBC 957 Interface and 
Execution Package). 

You can also use your Series III development system as the environment for your final soft- 
ware product. The Series III system has an 8086 processor (the "8086 side" or 8086 execution 
environment) to run iAPX 86, 88 applications software. As soon as you have debugged your 
software, it is ready to be used in any Series III system. Chapter 6 describes the run-time 
libraries you use to run your Pascai-86 programs in the Series ill environment; you can also 
supply your own versions of these libraries to run these programs in another execution 
environment. Chapter 6 also shows how you can link modules and locate them in Series III 
memory in one easy step to prepare them for execution in the Series III system. 

Whatever environment you choose for your final product, Intel provides the appropriate hard- 
ware and software tools to develop, debug, and produce your final product. The Intel 
environments that are suitable for final software products are excellent investments which can 
be upgraded for the software of the future. 



CHAPTER 2 
OPERATING THE SERIES III SYSTEM 



"The benefits of using a standardized operating system should prove to be as significant as 
the benefits of using standardized microcomputer hardware. Development and programming 
costs will be reduced substantially, and you will have an upward compatible interface for future 
products." 

—Andrew S. Grove, President of Intel Corp. 



As you learned in Chapter 1, the Intellec Series III Microcomputer Development System con- 
tains the tools you need to develop software for your application. To use these tools, you must 
operate the system; that is, use the system's commands and utility programs. 

A large multi-user computer system can serve as a useful analogy to point out the difference 
between programming the system and using the system. A working system usually supports 
both kinds of activities. In such a large system, one or more programmers might be designing 
programs to run on the system. One or more users (who might also be programmers) might be 
simply using the programs that have already been developed for the system. Obviously, a user 
does not need to know complicated details about the system to use it, whereas a programmer 
needs to know such details to write programs for the system. 

The Series III system has most of the capabilities of larger systems, but it is only used by one 
person at a time. This person could be using the system and its programs, or writing programs 
for the system. 

We wrote this chapter for people who need to know how to use the system. This information is 
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first-time user does not need. As we describe system commands and utility programs, keep in 
mind that we swept the more complicated details under the rug to keep the chapter easy to 
read. For more details on all of the system commands, see the Intellec Series III Micro- 
computer Development System Console Operating Instructions. 

TURNING ON YOUR SYSTEM 

Every microcomputer has something called an operating system, which is sometimes called a 
supervisor or monitor. It is usually the first piece of software you use— the software that is con- 
trolling your computer when you first turn it on, and the software that responds to your first 
typed command. Typically, you type a command to ask the computer for a list of the files you 
have on disk, or to execute a particular program. 

When you turn on the Intellec Series III Microcomputer Development System, the following 
message appears on your screen: 

SERIES II MONITOR, Vx.y 



CHAPTER 2 



This message tells you that the monitor is up and running (the x and y represent version 
numbers). The monitor is a piece of software that gives you direct control of the Series III hard- 
ware. Although you can use the monitor for debugging and other operations, for your pur- 
poses the monitor performs one quick activity: it loads the operating system from the system 
disk in drive into the computer when you push the RESET button. 

To load or "boot" the system, you need a system disk: a disk that holds the operating system 
files. Intel supplies a flexible disk labeled "ISIS-II Operating System" which is your system 
disk. One of the first operations you will perform is a formatting operation to create another 
copy of the system disk— a copy designed to be used with the examples in this book. 

You insert the "ISIS-II Operating System" disk into flexible disk drive 0, and push the RESET 
button (for more detailed instructions, see the Intellec Series III Microcomputer Development 
System Console Operating Instructions). The following message should appear on your 
screen: 

ISIS-II, Vx.y 

The operating system for the Intellec Series III Microcomputer Development System is called 
ISIS-II (' 'ISIS' ' stands for Intel Systems Implementation Supervisor). The x ahd y represent ver- 
sion numbers. ISIS-II is actually a version of the ISIS operating system that runs on older 
Intellec systems (the Intellec Microcomputer Development System and the Intellec Series II 
Microcomputer Development System). 

ISIS-II manages your use of the software tools supplied with the system. Using ISIS-II, you can 
run utility programs like CREDIT (a text editor) to write programs, or LINK86 to link program 
modules into a final program. You also use ISIS-II to run compilers like the Pascal-86 and 
PUM-86 compilers, and to run your own developed programs. You can also make copies of 
programs and control the devices attached to your system by using ISIS-II commands. 

In most computer operations, you manipulate files, which are collections of information. Every 
file has a name, called a filename. Files and filenames are described in detail after an introduc- 
tion to the most popular operating system command— the DIR command. 

You use the DIR command to display a directory of filenames on a certain disk. You use other 
commands to perform file management operations. For example, you use the COPY command 
to make copies of files, or to send copies of files to the printer to be printed. You use the 
RENAME command to change a file's filename. This chapter explains some of these 
commands. 



THE DIRECTORY LISTING 

The first command to learn is the easiest to use— the DIR command. When your system is up 
and running, you will see a dash (-)on the left side of the screen. This dash is called a prompt, 
and it tells you that the system is ready for your next command. You can now type the DIR com- 
mand by typing the letters "DIR", and execute the DIR command by pressing the RETURN 
key. The following example is shown in blue to show that it is something you type; the part of 
the example that is in ordinary black shows what the system displays. The symbol "<cr>" 
means that you must press the RETURN key ("cr" stands for the "carriage return" key found 
on most typewriters). 
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-DIR<cr> 

DIRECTORY OF : FO : 970003 . 06 
NAME .EXT BLKS 
SYSTEM. LIB 24 
PLM80 .LIB 45 

143 
1317/4004 BLOCKS USED 

When you execute the DIR command, the system displays a list of filenames called a directory 
listing. These filenames are the names of the files that are stored on the disk in drive 0. The 
DIR command displays the directory for the disk in drive unless you specify another drive 
number with the command, as explained in the next paragraph. Disk drive is usually the drive 
that holds the system disk (the disk that contains the system files), so by executing the DIR 
command by itself, you get a directory listing of some of the files on the system disk in drive 
(not all, because some files are invisible). 

You can use the DIR command to display the directory listing for disks in other disk drives, and 
for a hard disk subsystem, by specifying the drive number with the DIR command. For exam- 
ple, to see a directory listing for a disk in drive 1, insert the "CREDIT ISIS-II CRT-Based Text 
Editor" disk in drivel, and type the following command: 



-DIR 1<cr> 
















DIRECTORY OF 


:F1 : 


970049.02 












NAME .EXT 


BLKS 


LENGTH ATTR 


NAME 


.EXT 


BLKS 


LENGTH 


ATTR 


CREDIT 


156 


19470 


CREDIT 


.HLP 


25 


2985 


W 


ADDS .MAC 


3 


171 U 


MICR0B 


.MAC 


3 


158 


W 


UTS? MAP 


3 


163 U 


VT1Q0 


. MAC 


j 


i 9Q 


u 


1510T .MAC 


3 


165 U 


1510E 


.MAC 


3 


170 


U 


LEAR .MAC 


2 


123 













201 
310/4004 BLOCKS USED 

The Intellec Series III Microcomputer Development System Console Operating instructions 
give details about typical hard disk and flexible disk configurations, and the associated drive 
numbers. 

On each line of the directory listing, you are shown the name of a file. Some of these filenames 
are followed by a three-character extension, which is an optional identifier used to show types 
of files. These extensions are sometimes required for certain files that are used with certain 
programs. The section on filenames (following disk formatting) explains some of these 
extensions. 

Following each filename entry are three columns labeled "BLKS", "LENGTH", and "ATTR". 
The "BLKS" column tells you how many "blocks" of space the file occupies, where one block 
equals 128 bytes. The "LENGTH" column gives the actual number of bytes occupied by the 
file. At the bottom of the listing appears a message showing how many blocks are used out of 
the total number of blocks available on the disk. You can use block figures to describe file 
sizes and to determine whether a file of a given size (in blocks) will fit on a disk. 

The "ATTR" column might be empty, or it may contain a "W", "S", or both. This column tells 
you the attributes of each file— certain characteristics that govern the file's use. If a file has the 
"W" attribute, it is write-protected; that is, you cannot write to or delete (overwrite) the file. If a 
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file has the "S" attribute, it is a system file that occurs on most system disks. You use the 
ATTRIB command and file attributes to protect your files from inadvertant delete or write 
operations, and to designate certain files as system files (as shown in the next section). 

There are other files not displayed through normal use of the DIR command. These files are 
invisible; that is, they have the I attribute. You can see them if you use a special form of the DIR 
command: 



-DIR Kcr> 


















DIRECTORY OF 


:F0: 


970003.06 












NAME 


EXT 


BLKS 


LENGTH 


ATTR 


NAME 


.EXT 


BLKS 


LENGTH 


ATTR 


ISIS 


.DIR 


26 


3200 


IF 


ISIS 


MAP 


5 


512 


IF 


ISIS . 


.TO 


24 


2944 


IF 


ISIS 


. LAB 


54 


6784 


IF 


ISIS 


.BIN 


94 


11740 


SIF 


ISIS 


,CLI 


20 


2407 


SIF 


ATTRIB 




40 


4909 


WSI 


COPY 




69 


8489 


WSI 


DELETE 




39 


4824 


USI 


DIR 




55 


6815 


WSI 


EDIT 




58 


7240 


WSI 


FIXMAP 




52 


6498 


WSI 


HDCOPY 




48 


5994 


USI 


HEXOBJ 




34 


4133 


WSI 


IDISK 




63 


7895 


WSI 


FORMAT 




62 


7794 


WSI 


LIB 




82 


10227 


WSI 


LINK 




105 


13074 


WSI 


LINK 


.OVL 


37 


4578 


WSI 


LOCATE 




120 


15021 


WSI 


OBJHEX 




28 


3337 


WSI 


RENAME 




20 


2346 


WSI 


SUBMIT 




39 


4821 


WSI 


SYSTEM, 


.LIB 


24 


2849 


WS 


FPAL 


.LIB 


74 


9125 


w 


PLM80 , 
1317 


.LIB 


45 


5615 


W 


1317/4004 BLOCKS 


USED 















The "I" is called a switch, and it displays files that have the invisible attribute. When you 
specify the "I" switch in a DIR command, the DIR command displays all of the filenames, 
including ones that are invisible. The files that weren't displayed during the execution of a nor- 
mal DIR command are now displayed, along with their attributes (one of which is the "I" 
attribute). The "F" attribute is reserved for system files that are used to format the disk. These 
files are called format files, and you should never alter their attributes. 

You should practice using the DIR command, and at the same time, take a look at the directory 
listings for each disk you received. Take each flexible disk, insert it into drivel, and type "DIR 
1" to see the directory listing. 

NOTE 

If you have a hard disk subsystem with only one flexible disk drive, use the following 
form of the DIR command: 

-DIR P<cr> 

LOAD SOURCE DISK, THEN TYPE (CR) 

Take out the system disk and insert the disk whose directory you want to display, 
then press the RETURN key. After the directory listing, the following message 
appears: 

LOAD SYSTEM DISK, THEN TYPE (CR) 

Put the system disk back into the flexible drive. To see other disk directory listings, 
repeat these steps for each disk. 
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FORMATTING DISKS 

We present in this section a typical scheme for storing copies of your Intel-supplied files on 
either hard disk or flexible disk. Subsequent examples in this book assume that certain pro- 
grams reside in hard disk drives and 1 , or flexible disk drives and 1 . You may use your own 
scheme and distribute files over disk drives as you wish, but in order to type the examples as 
they are, you must use the scheme presented here. If you understand the use of pathnames as 
described in this chapter, and if you use the COPY command correctly, you can copy files to 
disks in any distribution scheme you choose, and still use the examples in this book as long as 
you substitute your own pathnames. 

if you are using a hard disk subsystem, you must foiiow the procedures in the inteiiec Series III 
Microcomputer Development System Console Operating Instructions to install your disk plat- 
ters and prepare them for use. If you are using flexible disk drives, you should refer to the 
same manual for instructions on the care and insertion of flexible disks. This section shows 
you how to prepare one hard disk platter or one flexible disk as the system disk, and another 
hard disk or flexible disk as a non-system disk (to hold your files and other programs). 



Hard Disk Subsystem Users 

Follow the instructions in the Inteiiec Series III Microcomputer Development System Console 
Operating Instructions to install and power-up your hard disk subsystem. When the hard disk 
subsystem is ready, insert your "ISIS-II Operating System" flexible disk into the flexible disk 
drive of your computer, and hit the RESET button. When the dash (-) prompt is displayed (after 

the I£l£-I1 nnOQQano annparct tyno tho frillnyiiinrt rnmmanrf- 

-:F4:F0RMAT : FO : SYSTEM . H D K S FROM 4<cr> 

This command prepares ("formats") drive of the hard disk to be the system disk. We chose 
"SYSTEM. HDK" for its name, but you can use any name that has at most six characters to the 
right of the period, and three to the left. When this operation is finished, and the system 
displays the dash (-) prompt, use the following command to transfer your system files to drive 
of the hard disk: 

-: F4:C0PY : F4:*.* TO : F0:<cr> 

This command will copy all of the files from the "ISIS-II Operating System" disk in the flexible 
disk drive (called drive 4) to the hard disk drive 0. When this operation is finished, you can 
remove the flexible disk from drive 4 and insert another flexible disk. In addition to the "ISIS-II 
Operating System" disk, you should also copy files from the "CREDIT ISIS-II CRT-Based Text 
Editor" disk, the "Resident 8086/8087/8088 Macro Assembler" disk, and the "Resident 
8086/8088 Utilities and Linkage Libraries" disk. For each flexible disk, execute the following 
command: 

-COPY : F4:*.* TO : F0:<c r> 

This command copies all files from the flexible disk to drive of the hard disk. If you insert 
each flexible disk you received and perform this operation, you will have in drive all of the 
files from those flexible disks. If you want to be more selective about the files you are copying 
to drive 0, read the "Copying Files" section in this chapter. 
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You should also copy files to drive 1 of the hard disk subsystem. First, you must prepare drive 1 
by typing the following command: 

-FORMAT : F1 : PR0G86 . H D K<c r> 

We chose "PROG86.HDK" for its name, because we intend to use it for our iAPX 86,88 applica- 
tion programs. If you are a Pascal-86 user, insert the "Pascal-86 Compiler and Run-Time 
Libraries" disk into flexible disk drive 4 and copy all of the files to the hard disk drive 1 : 



-COPY :F4:*.* TO 



: 1 ■ s - * v 



Do the same operation with your PL/M-86 flexible disk, and any other disks you have for your 
Series III system. The hard disk platters have plenty of room for your own files. 



Flexible Disk Users 

This section assumes that you have at least two double-density flexible disk drives. If you have 
single-density drives, you may run out of room if you try these examples. Refer to instructions 
in the Intellec Series III Microcomputer Development System Console Operating Instructions 
for information about flexible disks. 

To bring up your system, insert the "ISIS-II Operating System" disk into drive and push the 
RESET button. The ISIS-II message should appear, followed by the dash (-) prompt. Insert a 
blank disk into drive 1 , and type the following FORMAT command: 

-FORMAT : F1 -.SYSTEM. FLX S<cr> 

This command creates a new system disk and automatically copies from drive all files that 
have the "S" attribute. When this operation is finished, you can test your new system disk by 
removing the "ISIS-II Operating System" disk from drive 0, inserting your new system disk into 
drive 0, and pushing the RESET button to restart the system. 

With your new system disk in drive 0, insert the "CREDIT ISIS-II CRT-Based Text Editor" disk 
into drive 1 , and type the following command: 

-COPY : F1 :CREDIT TO : F0:<c r> 

This command copies the program CREDIT to our system disk in drive 0. Remove the CREDIT 
disk from drive 1 and insert the "Resident 8086/8087/8088 Macro Assembler" disk into drivel. 
Type the following command: 

-COPY :F1;RIIN.* TO :F0:< cr> 
:F1 :RUN COPIED TO :F0:RUN 
:F1:RUN.OV0 COPIED TO :F0:RUN.OV0 

This command copied two files at once— RUN and RUN. OV0— from drive 1 into drive 0. You 
need both files in order to use the special RUN command described later, 
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Remove the flexible disk from drive 1 and replace it with the "Resident 8086/8088 Utilities and 
Linkage Libraries" disk. Now type the following commands: 

-COPY : F1 : LIB86 . 86 TO :F0:<cr> 
:F1:LIB86.86 COPIED TO :F0:LIB86.86 
-COPY :F1:L0C86.86 TO :F0:<cr> 
:F1:L0C86.86 COPIED TO :F0:LOC86.86 
-COPY : F1 : LINK86. 86 TO :F0:<cr> 
:F1 :LINK86,86 COPIED TO : F0 : LINK86 . 86 

You now have a system disk that is complete for the examples in this book. You still need 

another rii^lf for the Pa<5rnl-ftfi nnmnilor if wnii hai/u nno is*, hnlr) +hes ^nmnilor +h" nm,(ima 

libraries, and your sample program used in examples in this book. To prepare a blank disk to 
be a non-system disk, insert the blank disk into drive 1 and type the following command: 

-IDISK : F1 :PASC86. FLX<cr> 
NON-SYSTEM DISK 

The IDISK command can prepare both system and non-system disks, but it does not 
automatically copy files except the ISIS-II format ("F") files. 

With the new blank disk in drive 1 and the system disk in drive 0, you could put the "Pascal-86" 
disk in drive 2 (if you have a drive 2). The following example assumes that you only have drive 
and 1. To copy the files from the "Pascal-86" disk, first type the following command (don't 
forget the "P" I): 

-COPY *.* TO : F1 : P<cr> 

LOAD SOURCE DISK, THEN TYPE (CR) 

The system pauses (because you specified a "P" at the end of the command), and waits for 
you to insert the "source" disk into drive 0. The "source" disk in this case is the "Pascal-86" 
disk, assuming you are a Pascal-86 user (if you're using PL/M-86 only, you would substitute 
your PL/ M-86 disk in this example). Insert this flexible disk into drive and press the RETURN 
key. 

LOAD OUTPUT DISK, THEN TYPE (CR) 

Since the disk to receive the Pascal-86 files is already in drive 1, you only have to press 
RETURN. The system should then display the above messages (along with the "COPIED" 
messages) every time it returns to drive to copy more files— all you have to do is continue to 
press RETURN until the entire copy operation is finished. 

You can repeat these steps with another blank disk for the PL/M-86 compiler. After these for- 
matting and copying operations, you should have disks that match the ones we used for the 
examples in this book. 



FILENAMES, PATHNAMES, AND FILE ATTRIBUTES 

Most operating system commands manipulate files. A file can be any collection of information 
including text, numeric data, program instructions, and combinations of all of these. You refer 
to a file by using a filename, and filenames follow certain naming conventions so that the name 
of a file also tells you the probable use of the file. 
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Filenames can have six or fewer characters, followed by an optional period and three- 
character extension. Extensions (and filenames themselves) follow certain conventions, but 
there are no fixed rules. Certain extensions are necessary for certain programs, as you shall 
see in the following discussion. The file naming conventions are relaxed so that you have the 
flexibility to create your own file naming conventions for your particular application. 

The term filename refers to both the name of the file and the extension, if any. Each new file 
you create must have a unique name for that disk (that is, you can have two files with the same 
name on two different disks, but not on the same disk). Some extensions have specific mean- 
ings to utility programs in the system, but these should not cramp the style with which you 
impose your own naming conventions. Here are the extensions that mean something to Intel- 
supplied programs: 

• The ".BAK" extension denotes a backup of a text file created by CREDIT, the text editor 
described in Chapter 3. For example, LETTER. BAK is the backup file for the text file 
LETTER.TXT (a text file does not need a particular extension, but "TXT" helps identify it). 

• The ".MAC" extension denotes a "macro" file used with certain programs like CREDIT. 
The ".MAC" files supplied with CREDIT enable you to use CREDIT on other non-Intel con- 
soles connected to Intel microcomputers. 

• The ".OVO" extension denotes an "overlay" file used with certain programs. 

• The ".OBJ" extension denotes an object module, which is created by a compiler or 
assembler, as described in Chapters 4 and 5. Compilers and assemblers also create files 
with the ".LST" extension to denote program listings (also described in Chapters 4 and 
5). Examples are PROG1.0BJ and PROG1 .LST. 

• The ".LNK" extension denotes a collection of object modules that were linked together 
by the linker utility program, described in Chapter 6. When you run the locater utility pro- 
gram on a file with the ".LNK" extension, the locater strips the ".LNK" extension away, 
leaving only the file's name without an extension. 

• The ".LIB" extension denotes a library module that is maintained by the library utility. 
Library modules are described in Chapter 6. 

• The ".86" extension denotes a program that should be executed in the 8086 execution 
mode (the "8086 side" of the system). Examples are PASC86.86 and PROG1 .86. 

Most completed programs have either the ".86" extension (if they run in the 8086 execution 
mode, described later in this chapter), or no extension. For example, the DIR command is 
actually a program named "DIR" without any extension. 

In addition to the above extensions, we use the ".SRC" extension to denote a special text file 
that holds program instructions called source statements. A ".SRC" (for "source") file can be 
created by CREDIT and filled with assembly language, PL/M, or Pascal source statements; you 
can then compile this file to create an object module (".OBJ" file), as described in Chapters 4 
and 5. 

You can find more extensions explained in the Inteliec Series III Microcomputer Development 
System Console Operating Instructions. 

You can display the directory information for a single file by using a version of the DIR com- 
mand, DIR FOR: 

-DIR FOR SUBMIT<cr> 

DIRECTORY OF SYSTEM. FLX 

NAME .EXT BLKS LENGTH ATTR 

SUBMIT 39 4821 



16 



OPERATING THE SERIES!!! 

The file SUBMIT is in the directory for drive 0, so the DIR command had no trouble finding it. 
However, if SUBMIT happened to be on another disk in drive 1, you would have to tell DIR to 
look in drive 1 for the file. To do this, you use a pathname— a filename with a directory 
specifier. Whenever you specify a filename for a command or utility program, if the filename is 
in the directory for drive 0, you only have to specify the filename. If the filename is not in the 
directory for drive 0, you have to specify a pathname. 

A pathname consists of a directory specifier and a filename: 
:F1 :PR0G1 .SRC 



Therefore, to get the directory information for the file PROG1 .SRC on the disk in drive 1 , type 
the following command: 

-DIR FOR : F1 :PR0G1 .SRC<cr> 

The number of separate disk drives depends on the configuration of your system. The format 
for directory specifiers is: 

:Fn: 

where n can beany drive number from to 9(0 would refer to drive 0, which does not have to be 
specified). 

If you type a directory specifier that is incorrect, you get an error message. For example, sup- 
pose you typeu tne lOnOwing uiR command with an incorrect directory specifier in the 
pathname for PROG1 .SRC: 

-DIR FOR :G1 :PR0G1 .SRC<cr> 

:G1 :PR0G1 .SRC, UNRECOGNIZED DEVICE NAME 

The "UNRECOGNIZED DEVICE NAME" is the ":G1:" directory specifier. ISIS-II thinks you are 
referring to a device by that name, and there is no device by that name. You will find legal 
device names in the section that describes copying files. 

Another common error occurs when you forget to use the word FOR in the DIR command when 
you are trying to get the directory information for one file. For example, you might type this 
command: 

-DIR : F1 :PR0G1 .SRC<cr> 

and get this error message: 

: F1 :PR0G1 .SRC, UNRECOGNIZED SWITCH 

Since you forgot the word FOR, ISIS-II thinks you are trying to specify a switch to the DIR com- 
mand—and it doesn't recognize ":F1 :PROG1 .SRC" as a switch! Switches are usually only one 
letter or number. Valid switches are described with the DIR command in the Intellec Series III 
Microcomputer Development System Console Operating Instructions. 
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The ATTRIB command assigns attributes to files. You use file attributes to protect your files 
from accidental deletions or modifications. You use the ATTRIB command to turn on or off the 
file attributes that are described below: 

• "W" for write-protected (The file cannot be written to, modified, renamed, or deleted 
unless this attribute is turned off.) 

• "I" for invisible (The file's name and information is only displayed when you execute the 
DIR command with the "I" switch.) 

• "S" for system files (System files on a source disk are automatically copied to the output 
disk in a FORMAT operation with the "S" switch.) 

• "F" for format files (Format files are automatically copied by the FORMAT and IDISK 
commands to format disks. Do not turn off this attribute, nor use it with your own files, 
unless you've read its description in the Intellec Series III Microcomputer Development 
System Console Operating Instructions.) 

For example, to turn on the "W" (write-protected) attribute for file CREDIT, type the following 
command: 

-ATTRIB CREDIT W1<cr> 

FILE CURRENT ATTRIBUTES 

:F0:CREDIT W 

To turn off the "W" attribute, specify a instead of a 1 : 

-ATTRIB CREDIT W0<cr> 

FILE CURRENT ATTRIBUTES 

:F0:CREDIT 



RENAMING AND DELETING FILES 

Occasionally you will have a file with a name that needs to be changed for some reason. For 
example, you could rename LIB86.86 to LIBRY.86 by using the RENAME command: 

-RENAME LIB86.86 TO LIBRY.86<cr> 

The RENAME command always expects to see the original name first, followed by a space, 
then the keyword TO, followed by another space, and finally the new name. Both names must 
be legal Series III filenames or pathnames. You cannot RENAME a file in one directory to a 
name with a different directory specifier— the new name must have the same directory 
specifier. 

If you actually renamed LIB86.86 to LIBRY.86, you should rename it back to LIB86.86, the name 
used for it in future examples. 

The DELETE command is very simple. Since there are no files in your system disk that you can 
delete, we'll use in this example a file that doesn't actually exist on your disk: 

-DELETE SAMPLE. TXT<cr> 
:FO:SAMPLE.TXT DELETED 

The DELETE command will irrevocably delete the file you specify. When you DELETE a file, 
you cannot retrieve it— it's gone. Use DELETE with caution. 
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To delete a file on a disk in a drive other than drive 1, simply use the appropriate pathname for 
the file. For example, suppose the file JUNK. TXT existed on the disk in drivel. You would use 
this command to delete it: 

-DELETE : F1 : J UN K . TXT<c r> 
:F1:JUNK.TXT DELETED 

You can also delete many files at once. As you will see in Chapter 3, CREDIT creates a backup 
file with a ".BAK" extension for every file you edit. At some point (to utilize disk space), you 
might want to delete all of your backup files at once. For example, to delete all of the backup 
files on the disk in drive 1 , use the following command: 

-DELETE :F1 :*.BAK<cr> 

The asterisk (*) matches any name, and the ".BAK" extension matches only filenames with 
that extension. This "filename matching" technique is shown in more examples to come. 



COPYING FILES TO DISKS AND DEVICES 

The COPY command is useful for several operations: 

• To make a copy of a file 

• To send a copy of a file to another hard or flexible disk 

• To send a copy of a file to a device like a printer or a paper tape punch 

• To receive a file from a sending device like a paper tape reader 

• To co nu a!! non-system files from one disk to another 

The COPY command is similar to the RENAME command. For example: 

-COPY :F1 :PR0G1 .SRC TO : F1 : PR0G1 . B AK<c r> 
COPIED : F1 :PR0G1 .SRC TO : F1 : PR0G1 . BAK 

The COPY command expects to see the name of the source file or device (the source of the 
information to be copied, not to be confused with a source fiie of program source statements), 
followed by a space, then the keyword TO, followed by a space, and then the name of the out- 
put file or device (the destination of the copied information). After the output (or destination) 
file or device name, you can optionally specify a switch like "P" for pause, or "U" for update 
(these switches are explained in the Intellec Series III Microcomputer Development System 
Console Operating Instructions). 

More frequent uses of the COPY command are copying to devices, copying files onto other 
disks, and copying all the files in one disk to another disk. In all of these cases, you must 
specify the device or disk that is the source of the information, and the device or disk that will 
receive the copied information. For example, the RENAME program is in the directory for drive 
0. If you want to put a copy of it on the disk in drive 1 , you would type the following command: 

-COPY RENAME TO : F1 :<cr> 
COPIED :F0:RENAME TO :F1:RENAME 

When the source file is in the directory for drive 0, you don't have to specify :F0: for the file, 
because :F0: is the default directory if none is specified. When the destination is a disk in 
another drive, you have to specify the directory (in this case, :F1 :) for the destination file. 
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In the example above, the file RENAME was copied to the disk in drive 1, and the drive 1 ver- 
sion has the same name. When you make copies of files for other disks, you will probably want 
the files on the other disks to have the same name. To keep the same name for the copy, 
specify only the destination directory without a new filename, as we did in the above example. 

To change the name for the copy, specify a different name with the destination directory. For 
example, if you want to use RNAMasthe name of the new copy in drivel, use this command: 

-COPY RENAME TO :Fl:RNAM<cr> 
:F0:RENAME COPIED TO :F1:RNAM 

In the last two examples, the RENAME file was copied from drive to drive 1 . To demonstrate 
another feature of the COPY command, we will first copy a file from drive 1 to drive (you 
should also try this example): 

-COPY :F1 :PR0G1 .SRC TO :F0:<cr> 

:F1 :PR0G1 .SRC COPIED TO : FO : PR0G1 . SRC 

Let's suppose that we used CREDIT (described in the next chapter) to modify the new copy of 
PROG1.SRC on the disk in drive (:F0:PROG1.SRC), and that we want to copy the newly- 
modified PROG1 .SRC to the disk in drive 1 . Since we already have a PROG1 .SRC on the disk in 
drive 1 , we might want to DELETE that one first, then COPY the newly-modified one to the disk 
in drive 1 . However, let's suppose that we forgot to DELETE the old one first, or that we don't 
even know the old one exists on the disk in drive 1. We would type the following COPY com- 
mand: 

-COPY PR0G1.SRC TO :F1:<cr> 

:F1 :PR0G1 .SRC FILE ALREADY EXISTS 

DELETE? 

The COPY command found :F1:PROG1.SRC, and now it is asking us if we want to delete it in 
order to replace it with the newly-modified :F0:PROG1.SRC. We type a "Y" (or "y") to delete 
the old one and replace it with the new one, or type an "N" (or "n" or any other letter) to keep 
the old one and abort the copy operation. In this case, we want to replace the old 
:F1:PROG1.SRC with the newly-modified :F0:PROG1.SRC, so we type a "Y" followed by the 
RETURN key: 

DELETE?Y<cr> 

:F0:PR0G1 .SRC COPIED TO : F1 : PR0G1 . S RC 

By using this feature of the COPY command, you can selectively update existing files by typing 
"Y" (or "y") for the ones you want to update, and "N" (or "n") for the ones you don't want to 
update. 

To send a file to a device like a line printer or a paper tape punch, specify the device name as 
the destination device: 

-COPY PR0G1.SRC TO :LP:<cr> 
:F0:PROG1 .SRC COPIED TO :LP: 
-COPY PR0G1.SRC TO :HP:<cr> 
:F0:PROG1 .SRC COPIED TO :HP: 

The device name :LP: is the name of the line printer. The second example sends the file to the 
high-speed paper tape punch, whose device name is :HP:. For other device names, see the 
Intellec Series III Microcomputer Development System Console Operating Instructions. 
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The COPY command can also be used to copy several files at once, if you make use of wild 
card filenames. You can specify a wild card filename with the DELETE, RENAME, COPY, DIR, 
HDCOPY, and ATTRIB commands. A wild card filename matches a group of filenames in order 
to perform the action on several files at once. For example: 

-COPY *.* TO :F1 :<cr> 

This command copies all of the files in directory :F0: to directory :F1:. 

NOTE 

To perform this example, you should insert a new disk into drive 1 and use the IDISK 
command (described in the next section in more detail) to prepare the new disk in 
drive 1 before copying ail of the files in drive to it. 

The above example demonstrates use of the wild card filename "*.*". The first asterisk will 
match any number of characters in the name, and the second asterisk will match any three 
characters in the extension of the filename. 

You can also specify some of the characters of a filename in a wild card filename. For example, 
if you wanted to copy all of the files that have ".SRC" as an extension, you would use this 
COPY command: 

-COPY *.SRC TO :F1 :<cr> 

There are other wild card filenames that are described in detail in the Intellec Series III 
Microcomputer Development System Console Operating Instructions. 

There are several ways to copy entire disks. The IDISK and FORMAT commands are used to 
prepare ("format") disks for use in the Series III system. The IDISK command will simply for- 
mat the disk as a system or non-system disk, copying over to the new disk only the format 
("F") files that are needed to format the new disk as a system or non-system disk. 

The FORMAT command will format a new disk as a system or non-system disk depending on 
the source disk implied (drive 0) or specified (using FROM). The FORMAT command will also 
copy certain files from the source disk. FORMAT with the "S" switch copies all files from the 
source drive that have the "S" (system) attribute. See the previous section on formatting disks 
for an example of the FORMAT command with the "S" switch. 

To copy all of the files from the source disk, use the "A" switch. To show an example of the 
FORMAT command with the "A" switch, insert another blank disk into drive 1, and type this 
command: 

-FORMAT :F1 :SYSTEM.BAK A<cr> 
SYSTEM DISK 



In this example, the FORMAT command formats the disk in drive 1 as a system disk because 
the source disk in drive is a system disk. The new disk is called SYSTEM. BAK. The "A" 
switch specified that all files from the source disk in drive should be copied to SYSTEM. BAK 
in drivel. 

So far, all of the FORMAT examples used the disk in drive as the source disk. If, for example, 
you have more disk drives and you want to FORMAT a disk in drive 1 using as a source a disk in 
drive 2, you would specify FROM 2 as in the following example: 



-FORMAT :F1:MYDISK A FROM 2<cr> 
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In a previous section on formatting disks, we described formatting operations to prepare your 
disks in a way that conforms with our examples. We do not necessarily recommend this for- 
matting scheme for your particular configuration. Chapter 2 of the Intellec Series III Micro- 
computer Development System Console Operating Instructions gives you the specific details 
for setting up disks in any Series III configuration, using the IDISK, FORMAT, and HDCOPY 
commands. 



EXECUTING COMMANDS AND PROGRAMS 

The Series III has two processors: the 8085 (8-bit processor), and the 8086 (16-bit processor). 
You can execute 8085-based programs in the 8085 environment (which is called the 8085 execu- 
tion mode or "8085 side"), and execute 8086-based (or 8088-based) programs in the 8086 
environment (which is called the 8086 execution mode or "8086 side"). When you type the 
filename of a program as a command (as you have been doing when you type "DIR" or 
"COPY"), you are executing the program in the 8085 execution mode. In order to execute a 
program or command in the 8086 execution mode, you must prefix the command RUN to the 
program or command you wish to execute. For example, if you want to execute LIB86.86, the 
8086 librarian (which can only be run in the 8086 execution mode), you would type the following: 

-RUN LIB86<cr> 

You should notice two things that are different: the use of the command RUN, and the fact that 
you do not have to supply the ".86" extension for LIB86.86 when you RUN it. 

The RUN command is actually a program supplied on the system disk that activates the 8086 
execution mode. When you supply a filename with no extension, the RUN command 
automatically attaches the ".86" extension to the name you supplied, and looks for the file by 
that name (i.e., the name with the ".86" extension). This is a protection feature you can use for 
your 8085 and 8086 programs: you can use the same name for both, with an ".86" extension for 
the 8086 program and no extension for the 8085 program. When you specify filenames without 
extensions, RUN only looks for files that are supposed to run in the 8086 execution mode; i.e., 
files with the ".86" extension. This protection feature assumes that you would put the "86" 
extension on files that are meant to run in the 8086 execution mode. 

If you actually executed LIB86.86, the following would appear on your screen: 

-RUN LIB86<cr> 

SERIES III 8086 LIBRARIAN, Vx.y 



The LIB86.86 program is now in control. To leave this program and return to the operating 
system, use the librarian's EXIT command: 

*EXIT<c r> 



You can, of course, supply an extension with the filename you supply to the RUN command, 
and the RUN command would not supply the ".86" extension. For example, if you have an 8086 
program called MYPROG.PRG and you want to run it in the 8086 execution mode (on the "8086 
side"), you would type the following: 

-RUN MYPR0G. PRG<c?-> 
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You can aiso RUN a program whose filename has no extension. However, you must supply a 
period to show that there should be no extension (i.e., to keep RUN from supplying the ".86" 
extension). The following is an example, assuming that the name of the program is not 
MYPROG. PRG but is MYPROG: 

-RUN MYPROG. <cr> 

When you use RUN as a command (as in the examples above), the 8086 execution mode is 
turned on for program execution, and when the program terminates, the 8086 execution mode 
also terminates, returning you to the 8085 execution mode. The 8085 execution mode is con- 
trolled by ISIS-II, which signifies its control by displaying the dash (-) prompt. You can, 
however, use RUN as a program and stay in the 8086 execution mode. 

To use RUN as a program, simply type RUN: 

-RUN<cr> 

ISIS-II RUN 8086, Vx.y 

> 

The RUN program displays a sign-on message and its own prompt, the right angle (>) bracket, 
to signify that the RUN program is now in control. This mode is called the interactive 8086 
mode, and you use it to execute more than one program. When you get the angle (>) prompt, 
you can type the filename of a program in order to execute the program. The rule stated above 
about the use of the ".86" extension stiii applies. 

The following example shows the execution of several 8086-based programs: PASC86.86 (the 
Pascal-86 compiler), LINK86.86 (the linker and binder), and PROG1.86 (the assembled, linked, 
and bound program). If your Pascal-86 disk (containing the compiler, run-time libraries, and 

SamolP PROG1 SRC* is in drive 1 anrl I INKER RA ie nn tho Hick in rti-iwo n »n.i r-!>r, tw^p thio 

example exactly as presented. The LINK86.86 command line shows use of the "&" continua- 
tion character that allows you to type commands over several lines without executing them. 
The EXIT command turns off the 8086 execution mode and returns you to ISIS-II and the 8085 
execution mode: 

-RUN<cr> 

ISIS-II RUN 8086, V1 .0 

> : F1 : PA3C86 :Fi:PROGi.SRC<cr> 

This executes PASC86.86 to compile 
PR0G1.SRC, both of which are on the 
disk in drive 1. The Pasca 1-86 
compiler displays some i n format i on . 

> LI NK86 :F1:PROG1.0BJ,:F1:P86RNO.LIB,:F1:P86RNl.LIB,&<cr> 
>>:F1:P86RN2.LIB,:F1:P86RN3.LIB,:F1:E80 87.LIB,&<cr> 

>>: F1 :E8087, :F1 :LARGE.LIB TO : F1 : PR0G1 .86 BIND<cr> 

This example shows use of the •'&'' 
command line continuation character. 
The entire command links the object 
program with the run-time libraries, 
and binds the linked module to form 
an executable program called 
PROG1 .86 
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> : F1 : PR0G1 <c r> This command executes : F1 : PR0G1 .86 

Farenheit temperature is:72<cr> 

PR0G1.86 is a temperature conversion 
program. When it asks for more 
input, you can stop the program by 
typing ' 'N ' ' . 



Another temperature input? 



:N<cr> 



>EXIT<cr> 



This terminates the 8086 execution 
mode and returns you to the 8085 
executi on mode. 



In the above examples, commands and programs were executed directly by typing the com- 
mand name or program name (sometimes followed by the name of a file to be acted upon by 
the command or program; this is called an actual parameter). When you execute a program or 
command directly, it is called interactive execution. 

In many cases you will want to submit a batch of commands or programs to be executed in a 
sequence. The SUBMIT command allows you to submit a file of commands as a job to be 
handled by the system without any interaction on your part. This is called non-interactive 
execution. 

You use SUBMIT by first providing a file of commands to be executed— a command sequence 
definition file, which has the extension ".CSD". This file can contain operating system com- 
mands, parameters for the commands, and comments— any line starting with a semicolon (;), 
or any text following a semicolon, is a comment, not an executable command. In the following 
example, note that the first command is the RUN command, which starts the 8086 execution 
mode, and that blank spaces in command lines are allowed to improve readability: 



CSD file to SUBMIT for linking a Pascal-86 object module 
to run-time support libraries (with E8087 emulator) 

Parameter = :fn:myprog 

Parameter 1 = drive containing run-time libraries 



RUN 

LINK86 %0.0BJ, & 

:F%1 :P86RN0.LIB, 



F%1 :P86RN1 .LIB, 

F%1 :P86RN2.LIB, 

F%1 :P86RN3.LIB, 

FX1 :E8087. LIB, 8 

FX1-.E8087, & 

F%1 :LARGE. LIB TO %0.86 BIND 



EXIT 



Returns to 8085 execution mode. 
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When this fiie, caiieci LNKBND.CSD, is submitted, the system will execute the RUN command, 
then the LINK86.86 program (the 8086 linker), and finally the EXIT command to leave the "8086 
side" and return to the 8085 execution mode. 

The percent symbols (%) indicate the use of formal parameters. When you execute the 
SUBMIT command, you supply actual parameters for each of these formal parameters. The 
following is an example: 

-SUBMIT LNKBND( : F1 : PR0G1 ,1 )<cr> 

The SUBMIT command first looks for LNKBND.CSD (it supplies the missing ".CSD" exten- 
sion), and then it substitutes the first actual parameter (=F1 :PR0G1) for "%0" and the 
second actual parameter (1 ) for "%1 " . The resulting command sequence is as follows: 

RUN 

LINK86 :F1 :PR0G1 .OBJ, S 

:F1 :P86RN0.LIB, & 

:F1 :P86RN1 .LIB, & 

:F1 :P86RN2.LIB, & 

:F1 :P86RN3. LIB, S 

:F1 :E8087.LIB, & 

:F1:E8087, & 

: Fl : LARGE. LIB TO :F1:PR0G1.86 BIND 

EXIT 

The SUBMIT program creates another file with a ".CS" extension to hold the resulting com- 
mand sequence. You should not modify this file. 

SUMMARY OF THE SERIES III OPERATING SYSTEM 

The Series III system has two execution environments: the 8085 environment (the "8085 side") 
where the ISIS-II commands and 8080/8085 programs run, and the 8086 environment (the "8086 
side"), activated by the RUN program, where 8086 and 8088 programs run. Programs that run in 
the "8086 side" usually have an ".86" extension in their filenames. The RUN program actually 
iooksforan ".86" extension if you specify a filename without an extension. 

You use the Series III operating system and its tools to develop software, but there is another 
way to use it: your software products can use it as an execution vehicle. The Intellec Series III 
Programmer's Reference Manual describes the "innards" of the Series III operating system 
and how your programs can make use of sections of the system. By using PL/M or assembly 
language, you can call operating system procedures directly (as described in the summary of 
Chapter 5) from your program. Pascal-86 programs automatically use the operating system pro- 
cedures by using run-time libraries which interface between the Pascal-86 programs and the 
Series III system. 

The Series III system has a standard set of procedures that your software products can use; by 
using this standard programming interface, you can be sure that your future programs will 
remain compatible with present and future Intel operating systems. 

There are a few more commands that were not introduced because they are used infrequently, 
or they are easy to use. These commands are adequately introduced in the Intellec Series III 
Microcomputer Development System Console Operating Instructions. You should consult this 
manual anyway, to be aware of details not mentioned in this tutorial. 
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"A good workman is known by his tools." —proverb 



You use a text editing program to create any kind of document, including a document that con- 
sists of program instructions. CREDIT is a text editor that takes advantage of the capabilities 
you have with CRT screens to: 

• Display and scroll text on the screen 

• Rewrite text by typing new letters over old ones 

• Rearrange lines of text and insert new lines of text between old lines 

• Move to any position in the text file or to any point on the screen instantly 

• correct typing mistaKes eashy as you type 

To simplify everyday text editing operations, CREDIT also provides features that allow you to: 

• Save both the newly edited version and the old unedited version of the same document 

• Find any string of characters and substitute another string of characters automatically 

• Copy sections of a document to use in another document 

• Create macros to execute several commands at once, or to repeat sets of commands 
(command iteration) 



CREDIT is useful for all documents; for example, we used CREDIT to write this book. CREDIT is 
more often used to write the Pascal statements, PL/M statements, and assembly language 
instructions that comprise program modules. Text files created by CREDIT are called 
documents if they are meant to be read by humans; and they are also called source programs if 
they consist of program statements (Pascal, PL/M, or FORTRAN statements, or assembly 
language instructions) that are read by compilers or assemblers in order to be compiled or 
assembled into working programs. 



In the following examples, we show you how to create and edit a text file consisting of English 
sentences that you can translate (eventually) into Pascal-86 statements. As described in 
Chapter 1, this step of generating Pidgin Pascal (English sentences describing a Pascal pro- 
gram) is a very important one in program development, because the program logic expressed 
in English sentences closely resembles human thinking and is therefore easier to debug. 
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CREATING A TEXT FILE AND INSERTING TEXT 

When you run CREDIT, you also specify the name of a file to be edited. If CREDIT can find the 
file you are specifying, it will open the file for editing. If CREDIT cannot find the file you are 
specifying, it will create a new file by that name. 

For example, let's create a file called PIDGIN.TXT in the directory for drive 0. To create and edit 
PIDGIN.TXT, type the following command: 

-CREDIT PIDGIN. TXT<cr> 

CREDIT responds with: 

ISIS-II CRT-BASED TEXT EDITOR V2.0 
NEW FILE 1982 FREE DISK BLOCKS 

The number of free disk blocks depends on the number of files on your disk and the size of 
your disk— you do not have to worry about it unless you get a "DISK FULL" warning. If you get 
such a warning, terminate your CREDIT session by typing "EX" (followed by RETURN), and 
specify another disk (like :F1 :) for your text file. 

The screen is partitioned into two areas, as shown in figure 3-1 . 

Notice the vertical line " | " in the text area? This symbol marks the end of the text in the file. 
Since the file is new and holds no text yet, this symbol appears at the beginning of the file. As 
you type text into the file, the symbol moves and continues to mark the end of the text. 

The blinking cursor sits underneath this vertical line. You can immediately type text into the 
file: 

just t ype ! | 

As you type, you can make changes to the text you already typed by moving the cursor back to 
the previous text and typing over it. Move the cursor by using the cursor control keys that sur- 
round the HOME key (do not use the HOME key yet!). If you inadvertantly typed the HOME key, 
hold down the CNTL key and type a V (Control-V) to return the cursor to the text body. 



COMMAND AREA 



Figure 3-1. The CREDIT™ Video Display 



28 



Text Editing 



You end each line of text with a carriage return by typing the RETURN key, just like a 
typewriter. CREDIT displays the carriage return operation as an uparrow (t). The carriage 
return operation is actually performed by two ASCII codes: one for the carriage return 
character, and one for the line feed character. CREDIT uses one symbol, the uparrow (t), for 
both characters. This symbol is called the line terminator. 

There are several keys used often in editing: 

• The RPT (Repeat) repeats whatever key you hold down. For example, hold down both the 
RPT key and a cursor movement key, and the cursor will move faster. Use the RPT key 
with RUBOUT to erase a line. 

• The TPWR (Typewriter) key, when in the down position, displays every character in lower 
case like a typewriter. When in the up position, all characters are in upper case. 

• The ESC (Escape) key will cause a break in an executing command. 

If your keyboard seems to freeze and does not display characters, you probably moved the 
cursor past the vertical line. You cannot type any characters after the vertical line, since the 
vertical line marks the end of the text. You can move the cursor to the vertical line and type, 
thereby moving the vertical line, or you can move the cursor to any position before the vertical 
line and type over the previously typed characters. 

The ISIS-II CREDIT (CRT-Based Text Editor) User's Guide contains an interesting tutorial ses- 
sion. Bciore you ieam how to use some o< CRlui i s powerful editing commands, you snouiu 
learn how to end a CREDIT session properly, without losing the edits you have made. Figure 
3-1 shows the layout of the screen; in the Command Area you'll find an asterisk. To move the 
cursor to this asterisk, press the HOME key. 
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Figure 3-2. The Series III Keyboard 
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When the cursor appears after the asterisk, you can type a CREDIT command. The EX (exit) 
command terminates a CREDIT session properly. Type "EX", followed by RETURN: 

*EX<cr> 

CREDIT will clear the screen and display the following message: 
EDITED TO :FO:PIDGIN.TXT 

By using the DIR command, you can see that the directory listing for :F0: now contains a new 
filecalledPIDGIN.TXT. 

You can use CREDIT to edit PIDGIN.TXT by invoking CREDIT again: 
-CREDIT PIDGIN. TXT<cr> 

This time, CREDIT does not have to create the file, because it already exists in the directory for 
the disk in drive 0. CREDIT responds with: 

ISIS-II CRT-BASED TEXT EDITOR V2.0 

OLD FILE SIZE=2 1980 FREE DISK BLOCKS 

The text you typed during the last example appears under this message. The message tells 
you that PIDGIN.TXT is an old file, its size is 2 blocks (a block is 128 bytes), and you have 1980 
free disk blocks in which to expand the file (these numbers vary depending on the space taken 
up by files on your disk). If you do not have enough free disk blocks to expand the file, CREDIT 
displays a warning message. 

You can continue to experiment with CREDIT by typing and retyping lines of text. When you 
are finished typing extraneous characters and are ready to type meaningful English 
sentences, move the cursor to the first character or screen position, and type CNTL and Z 
(hold down the CNTL key and type Z). The @ symbol will replace the character. Now move the 
cursor to the end of the text— to the vertical line— and type CNTL and Z together again. ZAP! 
You Just deleted all the text you typed. All of the characters between the two @ symbols were 
deleted, and you are left with an empty text file again. 

Let's start with the simple problem definition. Type the following sentence: 

Maintain the climate of a building using a system comprised off 
heating and cooling methods. T 



NOTE 

The uparrow(t) stands for the RETURN key. Use the RETURN key to end each line of 
text, including blank lines. 

Using CREDIT, you can type the sentences you know you need, and insert more sentences 
later. For example, you know you need the following sentences: 

Based on temperature data, see if there is a demand, t 

and determine the type of demand. t 

j-t there is no demand, simply continue operating the climate syste"".* 

I ■"' there is a demand for heat, determine the heating method,? 

and operate the system with this method. t 

I' fere is a demand for cold, determine the cooling method,* 

and operate the system with this method.* 
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Two questions should immediately come to mind: what information does the program need, 
and what else would a climate control program do? Let's add new sentences by using 
CREDIT'S insert capability. Here is our text file so far: 

Maintain the climate of a building using a system comprised oft 

heating and cooling methods. t 

t 

Based on temperature data, see if there is a demand, t 

and determine the type of demand. t 

If there is no demand, simply continue operating the climate system. T 

If there is a demand for heat, determine the heating method, t 

and operate the system with this method. t 
If there is a demand for cold, determine the cooling method, t 

and operate the system with this method. t 
t 

Move the cursor to the beginning of the fourth line of text (the line that begins with 
"Based on ..."). Hold down the CNTL key and type A (CNTL-A). The rest of the text disap- 
pears, and you are now able to type sentences. Type the following sentences and blank lines: 

t 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the f o I I o w i n g : t 

t 

Get the data needed for each pass: the time, the temperatures , t 

the weather, the state of the solar collector, etc.T 

Store this data.T 



Now type CNTL and A together again. The rest of the text file reappears with the new lines 
inserted in their proper places. By typing CNTL and A together, you turn on the Add Text 
Mode; by typing them again, you turn off Add Text mode. Here is your text file with the newly 
inserted lines: 



heating and cooling methods. t 

t 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the following:* 

t 

Get the data needed for each pass: the time, the temperatures, t 

the weather, the state of the solar collector, etc.t 

Store this data.t 

t 

Based on temperature data, see if there is a demand, T 

and determine the type of demand. t 

If there is no demand, simply continue operating the climate system. t 

If there is a demand for heat, determine the heating method, t 

and operate the system with this method. t 
If there is a demand for cold, determine the cooling method, t 

and operate the system with this method. t 
t 
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MOVING AROUND IN THE TEXT FILE 

Using the cursor movement keys, you can move the cursor anywhere within a screenful of 
text. If the text file is larger than twenty lines, it will not fit entirely in one screen— you have to 
scroll the screen by using the scrolling commands. 

The scrolling commands only operate when the cursor is in the text area (when the cursor is in 
the text area, you are in screen mode). Refer to figure 3-1 for an illustration of the text and com- 
mand areas. When the cursor is in the command area {command mode), you can only execute 
command mode commands; to move into screen mode (and move the cursor to the text area), 
type CNTL-V (hold down the CNTL key and type V). 

The scrolling commands are CNTL-N (to see the next screenful of text), and CNTL-P (to see 
the previous screenful of text). You can also use CNTL-V to see which character CREDIT is cur- 
rently pointing to, and to move into screen mode. If you experiment with CNTL-V, you will 
notice that the first use of CNTL-V moves the cursor to the character that CREDIT'S pointer is 
pointing to (more on this pointer in the next paragraph). Subsequent executions of CNTL-V 
rearrange the lines of text so that the line that contains the character pointed to by CREDIT 
becomes the third line in a screenful of text. This is very useful for partial scrolling. You can 
use these commands without fear, since they do not modify the text. 

NOTE 

The CNTL key, when used with another key (e.g., CNTL-V), is sometimes 
represented by the uparrow (t) symbol in our manuals and pocket references. For 
example, CNTL-V is shown as tV, and CNTL-A is shown as tA. 

The character pointer mentioned above is a reference point for all of CREDIT'S commands. In 
screen mode, the cursor represents the pointer. It is sometimes called "the CP". Most text 
editors have some pointer or marker that points to a place in the file, and commands that insert 
characters, delete characters, or search for characters use this pointer to find the place in the 
file to perform their operations. CREDIT'S pointer points to a single character, and this pointer 
moves whenever you move the cursor within the text area. When you type the HOME key and 
move the cursor to the command area, the pointer stays where it is, pointing to the character in 
the text area. The CNTL-V command moves the cursor back to the text area and back to the 
character pointed to. 

In screen mode, the cursor movement keys and the scrolling commands move this pointer. In 
command mode, all editing changes are made relative to the position of this pointer. Deleting a 
single character, for example, erases the character pointed to by the pointer, and moves the 
pointer to the next character. When you insert text, the text is inserted preceding this pointer. 
Many other commands also move this pointer. CNTL-V will always move the cursor to the 
character pointed to by this pointer. 

One command that always moves the pointer is the J (jump) command. You can only use the J 
command in command mode, and the J command leaves you in command mode (so you have 
to do another CNTL-V to get into screen mode). You can jump to any location relative to the 
pointer, or you can jump to specific locations called tags. You can set your own tags by using 
the TS (tag set) command, and delete tags by using the TD (tag delete) command. There are 
two permanent tags that need not be set, and that cannot be deleted: the beginning of the file, 
known as TT (tag for top), and the end of the file, known as TE (tag for end). For example: 

* J T T < c r > 

This command moves the pointer to the top of the text file (the beginning of the first line). 
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Since CREDIT usually puts the pointer at the top of the file when you start an editing session, 
the JTT command (jump to tag for top of file) is more useful during an edit session. The JTE 
command (jump to tag for end of file) is useful at any time: 

*JTE<cr> 

After using the J command, you are still left in command mode. Use the CNTL-V command to 
return to screen mode, and to return the cursor to the character pointed to by the CP. 

Use the JTE command (jump to tag for end of file), followed by a CNTL-V command to return to 
screen mode, in order to add a sentence to the end of our Pidgin Pascal software definition. 
The following example shows the execution of the JTE command, followed by a CNTL-V 

^u.u^.i.jvu mu ■ » ,, iwn^JWwu ** j w uiu^iu; v. uiv wuiiviii tvfti iiiu vriui \i i\* CuuCu QClllCuvC Ell IUC 

end: 

*JTE<c r> 



Maintain the climate of a building using a system comprised oft 

heating and cooling methods, t 

T 

Startup the climate system. t 

While the system is operating, do (and repeat) the following:'!' 

T 

Get the data needed for each pass: the time, the temperatures , t 

the weather, the state of the solar collector, etc.T 

Store this data, t 

t 

Based on temperature data, see if there is a demand,t 

and determine the type of demand. t 

If there is no demand, simply continue operating the climate system. T 

If there is a demand for heat, determine the heating method, t 

and operate the system with this method, t 
If there is a demand for cold, determine the cooling method, T 

and operate the system with this method. t 

If no method is possible (abnormal conditions),t 
shut down the climate system.? 

T 



FINDING OLD TEXT AND SUBSTITUTING NEW TEXT 

There will be numerous occasions when you will want to find a specific word or group of 
words, and move the character pointer at the same time. There will also be times when you will 
want to substitute a new word or group of words for an old one. For example, you might write a 
program that displays the name of your product (for example, "ACME Solar Controller") in 
several different places. Sometime later, you find out that the marketing people changed the 
name to "ACME Climate Controller". With one simple CREDIT command, you could substitute 
the new word ("Climate") for the old word ("Solar") wherever the old word occurs in the text 
file. You would only have to make sure that you specified the old name using upper and lower 
case characters as they appear in the file, and that the new name looks exactly as it should 
look. 
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The F (Find) command finds any string (group of characters) you specify. The S (Substitute) 
command finds the old string you specify and substitutes the new string you specify, and rear- 
ranges the text so that spaces aren't introduced into the file. The SQ (Substitute after Query) 
command finds the old string you specify, then asks you for a yes-or-no answer: a yes tells 
CREDIT to substitute the new string you specified, and a no tells CREDIT not to substitute the 
new string. If you executed the SQ command iteratively (see next section), CREDIT would con- 
tinue looking for more instances of the old string. 

To show examples of these commands, we'll return to our Pidgin Pascal text file to add some 
new text and substitute a new word for an old one. Use the F command to find the string 
"simply continue": 

*F/ simply continue/<cr> 

When the F command finishes, it displays the asterisk once again. To see where it put the 
character pointer, type CNTL-V. The cursor should be under the space after the last letter of 
"continue." We want to rewrite the sentence so that "no method" is one of the methods used 
to operate the climate system. 

At this point, it is easy to move the cursor to the appropriate place to insert new text. You can 
type over the old text, and use the RETURN key to continue typing a line. You can also use the 
CNTL-A combination to insert a lot of text. After inserting the new text, the sentences should 
read as follows: 

If there is no demand, choose ''no method'' as the method, t 

and operate the system with this method. t 
If there is a demand for heat, determine the heating method, T 

and operate the system with this method. t 
If there is a demand for cold, determine the cooling method, t 

and operate the system with this method. t 
t 

If no method is possible (abnormal condi t i ons) , t 
shut down the climate system. f 

To illustrate use of the S and SQ commands, we will substitute the word "request" for 
"demand" throughout our text file (and thereby make our program more polite). First, use the 
JTT command to move the character pointer to the beginning of the file; then use the S com- 
mand in the following manner: 

*JTT<cr> 

*S/ demand/ request /<cr> 



The S command found the first instance of "demand" and substituted "request" for it. Check 
to see the result by typing CNTL-V: 

Based on temperature data, see if there is a request, t 
and determine the type of demand. t 



Note that S command only found the first instance of "demand" and substituted "request" for 
it only. Note also that the S command must have moved the comma after the first "demand" in 
order to fit the word "request" in that place. 
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To execute the S or SQ commands repeatedly, you would use a form of command Iteration, 
The SQ command performs the same operation as the S command if you answer with a yes; on 
a no answer, the SQ command does not substitute text. Here is an example of the SQ com- 
mand, with a sneak preview of the easiest form of command iteration: 

* ! < S Q / d ema nd/request/><cr> 

The angle brackets around the entire SQ command, in conjunction with the exclamation point, 
cause the SQ command to be executed repeatedly until the command reaches the end of the 
text file. Do not be confused by the angle brackets surrounding the "cr"— that is the symbol 
depicting use of the RETURN key. Angle brackets delimit the command to be executed 
iteratively, and the exclamation point replaces a number that would specify the number of 
iterative executions. This is explained in more detail in the next section. 

The SQ command displays the line that contains the old text, and then displays a question 
mark. You must respond with a "Y" for yes, or an "N" for no: 

and determine the type of demand. t 
?Y 

You do not have to type RETURN after typing the "Y" or "N", because CREDIT is expecting 
such an answer. The SQ command goes on to find more instances of "demand": 

If there is no demand, choose ' ' no method'' as the method, t 

?Y 

If there is a demand for heat, determine the heating method, t 

?Y 

If there is a demand for cold, determine the cooling method, t 

?Y 



When the SQ command has found the end of the text file the condition for iterative execution 
is satisfied, and the execution ends. Type CNTL-V, followed by a CNTL-P, to see the previous 
page and the substitutions: 

Maintain the climate of a building using a system comprised oft 

heating and cooLing methods. t 

t 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the f o I I o w i n g : T 

T 

Get the data needed for each pass: the time, the t emperat ures , t 

the weather, the state of the solar collector, etc.t 

Store this data . t 

t 

Based on temperature data, see if there is a request, t 

and determine the type of request. t 

If there is no request, choose "no method'' as the method, t 

and operate the system with this method. t 
If there is a request for heat, determine the heating method,t 

and operate the system with this method. t 
If there is a request for cold, determine the cooling method, t 

and operate the system with this method. t 
t 

If no method is possible (abnormal conditions), t 
shut down the climate syst em. t 
t 
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MACROS AND COMMAND ITERATION 

Our Pidgin Pascal program still needs a modification that will vastly improve its readability. We 
need to indent all of the sentences that occur after the sentence "While the system is 
operating, do (and repeat) the following:". This will improve the readability, since it will then 
be obvious that the indented sentences are the actions that have to be repeated . 

To make this improvement, we will define a macro to hold several editing commands that will 
be executed iteratively. Rather than explain the process of defining macros and the syntax for 
command iteration, we'll show you the steps to take to make this improvement to our text file, 
and then we'll explain them. 

To begin, move the cursor (in screen mode, so that it also moves the character pointer) to the 
beginning of the blank line that follows the sentence "While the system is operating...". Your 
cursor (and the character pointer) should now be at the beginning of this blank line, as shown 
by the underscore "_" symbol: 

Maintain the climate of a building using a system comprised oft 
heating and cooling methods. t 

T 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the following:t 



Now type the HOME key to return to command mode. 

You can only define macros while in command mode. We will now define a macro called X that 
will make the improvement. Here is our definition of X: 

*MSXaL0;%<L;I/GI:2jG/;P>a<cr> 

Type this macro definition exactly as it is shown above (the "□" symbol stands for a 
space— type five spaces— and the "<cr>" stands for the RETURN key). When CREDIT finishes 
digesting this definition, it displays the asterisk again. Now type the following command: 

*MFX(13Xcr> 

You will see each line following the sentence "While the system is operating..." being acted 
upon by macro X. All of the lines following that sentence are now indented by five spaces, as 
shown below: 

Maintain the climate of a building using a system comprised oft 
heating and cooling methods. t 

T 

Startup the climate system. t 

t 

While the system is operating, do (and repeat) the following:! 

t 

Get the data needed for each pass: the time, the temperatures , t 

the weather, the state of the solar collector, etc.t 

Store this data .t 

t 

Based on temperature data, see if there is a request, t 

and determine the type of request. t 

If there is no request, choose ''no method'' as the method, t 
and operate the system with this method. t 
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If there is a request for heat, determine the heating method, T 

and operate the system with this method. T 
If there is a request for cold, determine the cooling method, t 

and operate the system with this method. t 
t 
If no method is possible (abnormal condi t i ons) , t 
shut down the climate system. t 
T 

"What was that gibberish I typed?" To answer your question, display the macro definition 
again by typing the following command in command mode: 

*?M<c r> 

XL0;%<L;I/ /;P> 

The display is exactly what you typed before, without the "@" symbols. The "@" symbols 
were used to define the macro— they delimit the actual text of the macro, so they are not 
necessary in this display (therefore CREDIT does not display them). 

The macro starts with its name: X. Following the name is the first command in the macro: the 
LO command, which moves the character pointer (called CP from now on) to the beginning of 
the current line (the line that the CP is currently sitting on— this line changes every time the 
entire macro executes). Following the LO command is a semicolon, which separates one 
command from the next. 

The next command in macro X is a set of commands to be executed repeatedly, or iteratively. 
The "%" (percent) symbol is a special one in this case, and is explained in the next paragraph. 
You saw the angle brackets in the last section— they delimit the set of commands to be 
executed repeatedly. The commands to be executed repeatedly are the L command (move CP 
to the beginning of the next line), the I command (insert the text that is specified within the 
following "/" (slash) symbols), and the P command (display the current line). The text within 
the "/" (slash) symbols consists of the five spaces we need to insert in order to indent the 
lines. 

Now we'll explain the "%" (percent) symbol. When you typed the command to execute macro 
X, you typed: 

*MFX(13Xcr> 

The "MF" command executes the macro "X". The number 13 in parentheses is called a 
parameter— the MF command substitutes the parameter you specify (in this case, 13) for the 
"%" (percent) symbol. The result is that the iterative command set ("<L;I/ /;P>") is 
executed 13 times. Why did we pick 13? Because there were only 13 lines ahead of the 
character pointer to be indented. We could have specified a "I" (exclamation point) symbol to 
execute the iterative command set over and over until it reached the end of the file, but we 
chose this method to show you the use of parameters in macros, and to make sure that the last 
two lines would not be indented. 

We also chose to use the "@" symbol to delimit the entire macro, but you can use any symbol 
that is not used within the macro. 

Obviously, there are more details you should learn before using macros and other advanced 
editing features. However, you do not need these features to perform simple editing opera- 
tions. They exist only to make your text editing sessions easier, if you first learn how to use 
them. 
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ENDING ATEXT EDITING SESSION AND MANAGING 
BACKUP FILES 

When you are editing text, the edited text is in the computer's memory, but it is not yet on disk. 
To update the text file with the edited text, you have to end your text editing session properly. 
The EX command properly replaces the old text in the file with the newly edited text, and it also 
saves the old version of the file in another file called a backup file. When the edit session ends, 
control of the system returns to the operating system (ISIS-II). 

If you have been following the examples in this chapter, you are now in CREDIT with your 
edited text, and you are ready to end your edit session. If you are not in command mode (with 
the asterisk prompt), use the HOME key to get into command mode. When you are in com- 
mand mode, type the following command: 

*EX<cr> 

The text on the screen should disappear, and another message should appear: 

EDITED TO :FO:PIDGIN.TXT 

The file PIDGIN.TXT, on the disk in drive 0, now contains the newly edited text. Use the DIR 
command to see the directory for drive 0. In the directory listing, you should see the filename 
PIDGIN. BAK. CREDIT created this file to be the backup file that contains the old unedited ver- 
sion of PIDGIN.TXT. Every time you use the EX command by itself, CREDIT automatically 
creates a backup file with the " .BAK" extension to contain the previous version of the file. 

NOTE 

You should not execute CREDIT to edit a backup file (a file with the ".BAK" exten- 
sion), because the EX command would first put the new edits into the ".BAK" file, 
then it would overwrite the "BAK" file with the previous (unedited) version of it. Use 
the REN (rename) command to rename the file before editing it, or use the filename 
option with the EX command, described in the next paragraph. 

You can optionally specify a filename with the EX command, so that the newly edited text 
becomes a new text file, and the old text file remains unedited. For example, if you had typed 
the following version of the EX command (rather than the preceding version): 

*EX NEW.TXT<cr> 

the following message would appear: 

EDITED TO :F0:NEW.TXT 

The file NEW.TXT would contain the newly edited text, and the old PIDGIN.TXT would not have 
been updated (and PIDGIN. BAK would not have been created as a backup file). 

NOTE 

If you type "EXIT" rather than "EX", CREDIT assumes that you want to store the 
newly edited text in the file IT (:F0:IT). 

Another way to end an edit session is to use the EQ (quit) command. The EQ command will 
keep all files unchanged, as if nothing had happened. All edits you made while in the edit ses- 
sion vanish, and the text and backup files (if they exist) remain unchanged. If you use the EQ 
command in a session that created the text file, the new text file would not exist. 
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To keep you from making a mistake, the EQ command will first ask you for a Y or N answer 
before it ends the session: 

*EQ<cr> 
QUIT?Y 

If you reply with anything other than a "Y" or ' 'y" , the EQ does not end the edit session. 

DISPLAYING AND PRINTING TEXT FILES 

Now that you have a text file, we can show you how to display the file on your screen and copy 
the file to a printing device. You can display the text file on your screen without using CREDIT 
by using the COPY command and the device name :CO: (for "console output"): 

-COPY PIDGIN.TXT TO :C0:<cr> 

To print the text file PIDGIN.TXT, you use the COPY command to copy the file to the device 
name :LP: (for "line printer"), or to the device name :TO: (for "teletype output"). You can 
COPY a file to any output device. You can find a complete list of device names in the Intellec 
Series III Microcomputer Development System Console Operating Instructions. This example 
assumes that you have an :LP: device to receive a copy of the file :FO:PIDGIN.TXT: 

-COPY PIDGIN.TXT TO :LP:<cr> 



FROM TEXT TO PROGRAM 

Your PIDGIN.TXT text file now contains an algorithm that is actually a program in disguise (the 
disguise is English, or Pidgin Pascal). You should keep a copy of it somewhere, perhaps on 
another disk (or leave it in drive if you have a hard disk subsystem). To use this algorithm in 
the next chapter, you will want to copy the text file to the Pascal-86 disk, and call it MAIN. SRC, 
since it will become the source file of your main control algorithm: 

-COPY PIDGIN.TXT TO : F1 : MA I N . SR C <c r> 
:FO:PIDGIN.TXT COPIED TO :F1:MAIN.SRC 

The examples in this and subsequent chapters assume that you either have a hard disk sub- 
system, or at least two double-density flexible disk drives. If you have single-density flexible 
disk drives, you should have more than two of them; in this case, you should put your program 
on the third disk, since it probably will not fit on the Pascal-86 disk in drive 1 . 

Although MAIN. SRC only has Pidgin Pascal statements at this time, you will edit them to make 
them real Pascal-86 statements as they appear in figures in Chapter 4. 



39 



CHAPTER 4 
PROGRAMMING IN PASCAL-86 



"One of the most important aspects of any computing tool is its influence on the thinking 
habits of those who try to use it..." 

— E. W. Dijkstra 



The Series III Microcomputer Development System was designed to support a variety of pro- 
gramming techniques with several programming languages. The preceding chapters give you 
the background you need to use this system wisely, and this and the following chapters help 
you decide the criteria for decomposing your application into modules and picking the 
appropriate language to use for each module. 

One popular approach to programming is the top-down approach, where you define the prob- 
lem completely, design an abstract algorithm to solve the problem, and refine this algorithm 
into self-supporting modules that can be coded and compiled separately. Typically, the main 
module would contain the most abstract algorithm— the control algorithm at the top of the 
design that solves the entire problem. The subordinate modules perform the procedures 
dictated by the main module. 

Pascal-86 is a language that is ideal for the main module of such a modular solution. Using 
Intel's Pascal-86 compiler, you can decompose a program into modules that can be compiled 
separately, whereas other Pascal compilers only compile whole programs which have to be 
tailored to fit into microprocessor environments. 

Perhaps the most important reason for Pascal's wide acceptance is the fact that it is a 

lannnano that rlncelu reiemhleQ Fnnlich In thia nact nrnnrammprs had tn kppn th^ir alnnrithm 
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designs well within the constraints of programming languages that were designed to express 
mathematical equations. In other words, at the outset they had to think in terms of the pro- 
gramming language available to them. This approach reinforced the practice of giving 
implementation ("how to") information in the problem definition (for example, "the input to 
this program is to be formatted on cards in columns 0-15 ..."). 

In Chapter 3 we designed an algorithm for the climate control of a building using English, which 
we jokingly call Pidgin Pascal. Since our control structures are in English, we have been able 
to communicate this algorithm easily and test its logic before translating it into Pascal-86. By 
now we should have a complete problem definition and a clean algorithm that could be 
translated into any programming language. 

TRANSLATING PIDGIN PASCAL TO PASCAL-86 

Figure 4-1 shows the main climate control algorithm, described in Pidgin Pascal. Several 
assumptions are made: that another subordinate module will operate the climate system, that 
yet another module will access and store the data, and that the data itself will be in the form of 
a record, which will be available to this algorithm. 
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As in typical development situations, a change has just occurred in our climate system that we 
software engineers have to accomodate: the first version of our climate system will not have 
cooling methods— only heating methods. We must design the software to make room for cool- 
ing methods in the future. 

We made another change to the algorithm to accomodate a "panic" condition. An algorithm is 
not complete unless it can handle any situation; remember, Murphy said that if it can go wrong, 
it will. Therefore, we added a test to see if the climate system can handle the request for heat. 
If neither the collector water nor the tank water is hot enough to heat the building, a panic con- 
dition occurs that stops the normal operation of the climate system. At this time, it is sufficient 
to simply stop the program and output warning messages; later, we can add more procedures 
to handle such panics. 

Using CREDIT (as described in Chapter 3), you can change this algorithm into Pascal-86 by 
adding the Pascal-86 statements and using comment symbols to turn the English sentences 
into program comments. The (* and *) symbols tell the Pascal-86 compiler to ignore whatever is 
between them. Some comments are only a few words surrounded by the (* and *) symbols, but 
comments can take up many lines, as shown at the end of the program in figure 4-2. As soon as 
the compiler sees the (* symbols, it ignores the characters and lines following it until it sees 
the *) closing symbols. 

These comments are carried over with the program statements to the listing file produced by 
the compiler. You use the listing file as documentation for the program, You'll see a listing file 
later in this chapter. 

Figure 4-2 shows the same algorithm expressed in Pascal-86 statements, with the English 
sentences masquerading as program comments. We also added more comments. It is a good 
practice to write the comments of a program before writing the actual program statements. 



Maintain the climate of a building using a system comprised of 
heat i ng methods . 

Startup the climate system. 

While the system is operating, do (and repeat) the following: 

Get the data needed for each pass: the time, the temperatures, 
the weather, the state of the solar collector, etc. 
Store this data. 

Based on temperature data, see if there is a request 

for heat . 

If there is no request, choose "no method 1 ' as the method, 

and operate the system with this method. 
If there is a request for heat, determine whether the 

system can handle the request. If not, cause a panic. 

Otherwise, determine the heating method, 

and operate the system with this method. 

If no method is possible (panic or abnormal conditions), 
shut down the climate system. 

Figure 4-1 . Algorithm for the Climate Control Main Module 
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(**Type and variable declarations to be supplied later**) 

(**Public procedures externaL to this program will be supplied later**) 

PROGRAM Ma inContro I (INPUT, OUTPUT) ; 

BEGIN (**Main Control Algorithm**) 

StartUpSystem; (*procedure to start up the climate system*) 

Operat i ng:=TRUE; 

Pani c:=FALSE; 

WHILE Operating DO (*While the system is operating, do 
(and repeat) the following:*) 
BEGIN 

GetData(CurrentData); 

(*Get data needed for each pass: temps, time, etc.*) 
StoreData(CurrentOata) ; (*Store this data as record*) 

(**If there is a request for heat, determine whether the system 
can handle the request. If not, cause a panic. 
Otherwise, determine the heating method, 
and operate the system with this method. 
If there is no request for heat, choose ''no method,'' 
and operate the system with this method. **) 

WITH CurrentData DO 
BEGIN 

IF InsideTemp<ThermostatSett i ng THEN (*if request*) 
BEGIN 

IF Co I lectorUat erTemp>Mi nimumForExchanger THEN 
BEGIN ChosenMethod:=Col lectorToExchanger; 

OperateSyst em(CurrentData); 
END 
ELSE IF Co I lectorWaterTemp>MimimumForHeatPump THEN 
BEGIN ChosenMethod:=Col lectorToHeat Pump; 

OperateSyst em (CurrentData); 
END 
ELSE IF TankWaterTemp>Mi nimumForExchanger THEN 
BEGIN ChosenMethod:=TankToExchanger; 

OperateSyst em (CurrentData); 
END 
ELSE IF TanKWa t £ rTcmpx" i mimumFo rKea t r uiTip intn 
BEGIN ChosenMethod:=TankToHeatPump; 

OperateSystem(CurrentData); 
END 
ELSE IF HeatedTankTemp>Mi nimumForHeatPump THEN 
BEG IN ChosenMet hod : = H eat edTankTo Heat Pump; 

OperateSyst em( Cur rent Data); 
END 
ELSE Panic:=TRUE; Operat i ng :=FALSE; 
END (*if heating request*) 
ELSE (*no heating request*) 

BEGIN ChosenMethod:=NoMethod; 

OperateSyst em (Cur rent Data); 
END; 
END; (*End routine U ITH CurrentData*) 
END; (*While operating*) 
ShutDownSyst em (CurrentData); (* panic or abnormal condition *) 
END. 

Figure 4-2. First Try at Coding the Main Program 
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(**The following are only comments: 

The following procedures will be coded in another module 
called the Operation Module: 

PROCEDURE OperateSystem(CurrentData) 

This procedure will operate the system and constantly 
maintain heat gain in the system. Depending on the 
heating method chosen, it opens certain valves and 
closes others, and turns on certain pumps and turns 
off others. It also maintains a flow of heated water 
to the storage tank. 

NOTE: for our testing purposes, a dummy Operat eSyst em 
procedure will only display messages telling us what 
heating method was chosen, and temperature data. 



PROCEDURE ShutDownSystem(CurrentData) 

This procedure will perform an orderly shut down if a 
panic or abnormal condition occurs. The shut down must 
keep warm water flowing through the solar collector and 
close any extraneous valves, etc. It must also send a 
warning messages to the console, advising manual operation 
of the furnace, etc . 

NOTE: for our testing purposes, a dummy Shut DownSyst em 
procedure will only display data and a shutdown message. 



PROCEDURE StartUpSystem 

This procedure will start the climate system (cold start, 
or after Shut DownSyst em occurs), open necessary valves, 
etc. It will also display a startup message. 

NOTE: for our testing purposes, a dummy StartUpSystem 
procedure will only display a startup message. 



The following procedures will be coded in another module 
called the GetData Module: 

PROCEDURE GetData(CurrentData) 

This procedure will obtain the data from a PL/M-86 module 
called PLMDATA that accesses ports to obtain temperature 
data. Data other than temperature data will come from 
ports via port input/output procedures in this Pascal-86 
modu I e . 

NOTE: for our testing purposes, a dummy GetData procedure 
will obtain all data from the console. 



Figure 4-2. First Try at Coding the Main Program (Cont'd.) 
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PROCEDURE StoreData(Current Data) 

This procedure w i L L store the data record CurrentData in a 
file (the file would probably reside in non-volatile bubble 
memo ry) . 

NOTE: for our testing purposes, a dummy StoreData procedure 
will simply output the data to the console. 



This is the last line of comments.**) 

Figure 4-2. First Try at Coding the Main Program (Cont'd.) 



This guide cannot possibly explain Pascal syntax— there are several books mentioned in the 
Bibliography that can give you the background you need, and the Pascal-86 User's Guide pro- 
vides all the information you need to use Intel's extensions to standard Pascal. 



PASCAL-86 DATA TYPES 

A major advantage that Pascal has over other high-level languages is its strong type checking 
mechanisms that enforce data typing. By using Pascal's data types, you avoid some of the 
classic causes of errors in programs— the ambiguities involved with using simple X and Y 
variables to hold truly non-numeric data, the mistakes that occur when you attach arbitrary 
meanings to numeric data, and the complexities that are magnified by ambiguous variable 
names. 

An example is worth a thousand explanations. In the Pascal-86 algorithm in figure 4-2, we make 
assignments like this one: 

ChosenMethod:=TankToExchanger; 

If ChosenMethod and TankToExchanger are declared properly in the module heading (not 
shown in figure 4-2, but shown later in this section), the Pascal-86 compiler will know their 
meanings. When you read this assignment, you know exactly what heating method has been 
chosen. The data type is a type of heating method, not an integer representing a method. In 
other programming languages you might be able to have a variable named "ChosenMethod" 
and another variable named "TankToExchanger", but you would also have to be sure to assign 
proper numeric or string values to them. A typical way of expressing the above assignment in 
PL/M would be: 

CH0SEN$METH0D = 2 
/*where 2 is the appropriate method*/ 



or 



CH0SEN$METH0D = T$T0$EXCH 
/♦where T$T0$EXCH has already been assigned the appropriate 
value*/ 
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In both cases, you have to know a numeric code for the heating method. In Pascal, however, 
you only have to define a set of heating methods, and pick one for the assignment. Here is an 
example of such a definition: 

TYPE Heat i ngMethods = ( Co I L ec to rToExc hange r , 

Col LectorToH eat Pump, 
TankToExchanger , 
TankToHeatPump, 
HeatedTankToHeatPump, 
NoMethod) ; 

(*The above defines the data type Heat i ngMethods , which is 
used to define the variable ChosenMet hod below.*) 

VAR ChosenMethod : Heat i ngMethods; 

In order to assign a value to ChosenMethod, the program must assign one of the methods in 
the set of type HeatingMethods. Any other assignment would cause a compiler error message 
to occur. By enforcing this data typing mechanism, the Pascal-86 compiler reduces the number 
of run-time errors by flagging the data type errors early in the game. 

There are several standard Pascal data types that are useful. For example, you can define a 
variable to be of type BOOLEAN, which means that the only values that can be assigned to the 
variable are the values TRUE and FALSE. The variables Operating and Panic are of type 
BOOLEAN ; they are either TRU E or FALSE. 

Note that ChosenMethod and CHOSENMETHOD would refer to the same variable, since lower 
case characters are treated as upper case. This feature allows you to create long identifying 
names with combinations of upper and lower case characters that are easy to read and 
understand. 



ANOTHER LOOK AT MODULARIZING AND HIDING INFORMATION 

The programming technique called information-hiding is not an excuse for designers to 
withhold information from their documentors— it is more akin to a technique we use to hold a 
lot of information in our minds. When we have to interface with several different organizations 
within a company in order to get a job done, we don't pay attention to the inner workings of an 
organization; we simply assume that the organization will do its job, and we define our inter- 
face with the organization. Their organization is one module, and ours is another module; the 
job gets done because the modules know how to communicate to each other without interfer- 
ing in each other's details. 

Most logical algorithms are designed with assumptions about working modules. In our 
algorithm in figure 4-2, we assume that the procedures StartUpSystem, GetData, StoreData, 
OperateSystem and ShutDownSystem will work as planned, even though they are not yet writ- 
ten. We also assume that another group may write them. We can make these assumptions 
because we designed our main module to hide most of the details about choosing heating 
methods. 

So far, the main module's algorithm decides the appropriate heating method based on a set of 
data. Once the algorithm is written, it may never change; and if it had to change, its change 
should not affect the other modules. However, we could change the control algorithm so that 
changes to the heating methods, or additional heating methods, would not even affect the 
main control algorithm. A simple way to do this would be to turn the heating method determina- 
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tion algorithm into an independent procedure called DetermineMethod, extract from this 
algorithm the calls to OperateSystem, and put the call to OperateSystem in the control 
algorithm. 

The resulting main module is shown in figure 4-3. We added the module heading, but we still 
need the interface specification and variable declarations (shown later). 

MODULE MainControl; 

(* Interface specification goes here, to be supplied later. *) 

(* Type definitions and variable declarations to be supplied later. *) 

PROGRAM MainControl (INPUT, OUT PUT); 



PROCEDURE DetermineMethodCVAR CurrentData : SystemData) ; 
BEGIN 

WITH CurrentData DO 
BEGIN 

IF InsideTemp<ThermostatSett i ng THEN 
BEGIN 

IF Co I lectorWaterTemp>MinimumForExchanger THEN 

ChosenMethod:=CollectorToExchanger 
ELSE IF Col lectorWaterTemp>MinimumForHeatPump THEN 

ChosenMethod:=Col lee torToHeat Pump 
ELSE IF TankWaterTemp>Mi nimumForExchanger THEN 

ChosenMethod:=TankToExchanger 
ELSE IF TankWaterTemp>MinimumForHeatPump THEN 

C hose nMethod: = TankToH eat Pump 
ELSE IF HeatedTankTemp>MinimumForHeatPump THEN 

ChosenMethod:=HeatedTankToHeatPump 
ELSE Panic:=TRUE; Operat i ng :=FALSE; 
END 
ELSE (*no heating request*) ChosenMet hod : =NoMet hod 
END; (*With CurrentData*) 
END; (*Determi neMet hod) 

(************** MAIN PROGRAM *************************************) 

BEGIN 

StartUpSystem; 
Operat i ng :=TRUE; 
Panic:=FALSE; 

WHILE Operating DO (*while system is operating, do:*) 
BEGIN 

GetData(CurrentData); (*Get the temps, time, etc.*) 
StoreDataUur rentData) ; (*Store this data as record*) 
Determi neMet hod (Cur rentDat a) ; (*this detects a panic*) 
OperateSyst em (Current Data); 
END; (*while operating*) 
ShutDownSystem(CurrentData); 
END. (*Main Control Algorithm*) 

Figure 4-3. Second Try at C oding the Main Program 
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The DetermineMethod procedure now hides all the information about choosing the 
appropriate heating method. We could also rewrite it to include cooling methods, or to change 
the heating methods. The procedure expects to receive the record CurrentData, and it only 
changes the value of the variable ChosenMethod. 

The OperateSystem procedure will not be written until more facts are known about the hard- 
ware of the actual climate system. However, we already know that if we make a decision about 
a chosen method, include that method in the data record CurrentData, and send that data 
record to the OperateSystem procedure properly, the OperateSystem procedure will know 
how to operate the system. We defer these details to a later time when we'll have a prototype 
system to operate. 

PASSING DATA TO OTHER MODULES-PARAMETER PASSING 
TECHNIQUES 

We designed our main module so that it will receive a record of information. A Pascal-86 record 
is much like a PL/M-86 structure which can be defined to hold certain data types. We have to 
define this record in order to write the main module, but we can defer decisions about obtain- 
ing the data in order to preserve our options. 

A PL/M-86 procedure could easily obtain the data and build the structure according to inter- 
face specifications; so could an 8086/8087/8088 Macro Assembly Language program, or an 8089 
Assembly Language program. In fact, we might be able to use existing routines to obtain the 
data, and simply write another routine to structure the data accordingly. 

In any case, we only have to pass the address of the structure to the Pascal-86 main module, 
which knows what to do with it. This parameter-passing technique is known as pass by 
reference, because the main module only needs a reference to the address of the structure in 
order to treat the structure as a Pascal record. 

Another parameter-passing technique is pass by value, where a procedure calls another pro- 
cedure and sends it a value rather than an address. We don't use this technique in our applica- 
tion, since our procedures need to access data in the record. We decided against passing 
specific values from this data record, and decided instead to make the entire data record 
available to the appropriate procedures. 

To define the data record properly and still provide the ability to change it easily, we created a 
data type for the record: 

TYPE (*definitions publicly defined in this module*) 



SystemData = RECORD 

ChosenMethod : Heat i ngHet hods ; 

Ins i deTemp , 

Thermostat Sett i ng : A i rTempe rat u r e ; 

Col tectorlrfat erTemp , 
TankWat e rTemp , 
HeatedTankTemp 
Amount Of Sun Light 
Hour 
Minute 
END (*SystemData*); 



Mate rTempe r at u re ; 
Integer; 
00. .24; 
00. .59; 
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Using the data type SystemData, we defined the variable CurrentData to be of that type: 

VAR 

CurrentData : SystemData; 



We pass the variable CurrentData to other procedures. If we were to change the data fields in 
the record, we would only have to change the definition of SystemData; we would not have to 
change any of the calls that pass the variable CurrentData. If the data fields kept the same 
names (ChosenMethod, ThermostatSetting, etc.), we would not have to change the routines 
that use those data fields. 



THE INTERFACE SPECIFICATION 

A module that calls a procedure in another module must have some information about where 
the other procedure is, and it must provide some information to the other procedure about the 
data being passed. Intel's Pascal-86 provides a mechanism for supplying the appropriate 
information to aii moduies that are to be linked to form a program — it is called an interface 
specification. 

The interface specification typically holds the type definitions and variable declarations that 
are needed by all modules, and it also contains the names of procedures (with their 
parameters) that are public to other modules; that is, they can be called from other modules. 
Each module of the entire program contains this information. Figure 4-4 shows the interface 
specification for our program. 

In addition to PUBLIC definitions in the interface specification, a module can have PRIVATE 
type definitions and variable declarations for variables used only within the module. Our 
Operation, module will have a PRIVATE section for all variables that are only used within the 
module, but our MainControl main module does not need one. In Pascal-86, a PRIVATE 
heading is used in non-main modules instead of a PROGRAM heading. 

Several enumerated types are defined in our program: AirTemperature and WaterTemperature 
are defined as types that can only have values in the ranges specified. The variables Hour and 
Minute are also of enumerated types, but since their ranges do not change, their types are not 
defined separately. By defining the temperature types separately, we can easily change their 
ranges without affecting the data record. 

By defining the data record as type SystemData, we can easily change data fields in the record 
without changing the CurrentData declaration. By defining and declaring types and variables in 
the interface specification, we can maintain the interface specification separately (and change 
definitions and declarations) without affecting the procedures. 



TEST VERSION OF THE CLIMATE CONTROL SYSTEM 

Since our hardware designs are not yet firm, we should put together a test version of our 
system that does not interact with any prototype hardware. This version should include 
dummy procedures for the procedures that would normally rely on 8088 ports and other 
hardware. 
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PUBLIC MainControl; (*section of interface specification*) 
CONST (*dec larat i ons declared publicly in this module*) 



Mi nimumForEx changer 
Hi nimumForHeat Pump 



35;(*degrees Celsius*) 
13; 



TYPE (*def i ni t ions publicly defined in this module*) 

Ai rTemperature =-20 . . 1 20; (*deg rees in Celsius*) 
Wat erTemperat ure =0 . .12 0; 
Heat ingHet hods =(CollectorToExchanger, 
Col tectorToHeatPump, 
TankToExchanger , 
TankToHeatPump, 
Heat edTankToHeat Pump , 
NoMethod) ; 
SystemData = RECORD 

ChosenMethod 
InsideTemp, 
The rmostat Set ting 
Col lectorWaterTemp, 
TankWat erTemp , 
HeatedTankTemp 
AmountOf Sunl ight 
Hour 
Hi nut e 
END (*SystemData*) ; 



HeatingMethods; 
A i rTemperature ; 



Wat erTemperat ure; 
Integer; 
00. .24; 
00. .59; 



VAR (*variables publicly defined in this module.*) 



Cur rent Da t a 

Ope rating. Panic 



: SystemData; 
: BOOLEAN; 



PUBLIC GetData; (*GetData Module containing GetData 8 StoreData*) 

PROCEDURE GetDatatVAR C u r rent Dat a : Sy s t emDa t a ) ; 
PROCEDURE StoreDataCVAR Current Dat a : SystemData) ; 

PUBLIC Operation; (*0peration Module containing Operat eSy st em, 
StartUpSystem and Shut DownSyst em*) 
PROCEDURE StartUpSystem; 

PROCEDURE Operat eSystem(VAR Cur rent Data : SystemData) ; 
PROCEDURE Shut DownSyst em( VAR Cu r rent Dat a : SystemData) ; 



Figure 4-4. The Interface Specification 
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The dummy versions are shown in figure 4-5. You should type these versions exactly as you 
see them, with the StartUpSystem, OperateSystem, and ShutDownSystem dummy procedures 
in the dummy Operation module stored in the file :F1:DUMOP.SRC, andGetDataand StoreData 
dummy procedures in the dummy GetData module stored in the file :F1:DUMDAT.SRC. The 
MainControl module should be stored in :F1:MAIN.SRC, and the interface specification shown 
in figure 4-4 should be typed into the file :F1 .INSPEC.SRC. If you cannot fit all of these files on 
the disk in drive 1, you should put all of them on another disk— and use your own pathname 
(:Fn:) for the ".SRC" files. For our examples we assume that these files are on the disk in drive 
1 , along with the Pascal-86 compiler and run-time libraries. 

Figure 4-5 shows each module and the dummy procedures. Since the interface specification is 
repeated in each module, we use a shortcut when compiling the modules by putting the com- 
mon interface specification in a seperate file (:F1 :INSPEC.SRC), and we use the INCLUDE con- 
trol ma control line as shown: 

$INCLUDE(:F1 : INSPEC.SRC) 

If you put INSPEC.SRC on a disk in a drive other than drive 1 , use your own pathname instead 
of :F1 -.INSPEC.SRC. 



MODULE MainControl; 

(* Interface specification common to all modules *) 

$INCLUDE(: F1 : INSPEC . SRC) 

nnnrniu u.. : .r «.» > n I ^ TMnilT n 1 1 T D 1 1 T S ■ 

rr\uui\nn naiin.uni.iuiv±iirui,wirwi/, 

(* end of interface specification *) 

PROCEDURE Determi neMethod(VAR CurrentData : Syst emDat a) ; 
BEGIN 

WITH CurrentData DO 
BEGIN 

IF Insi deTemp<ThermostatSett i ng THEN 
BEGIN 

IF Col lectorWaterTemp>Mi nimumForExchange r THEN 

Chose nMethod:=CollectorToExchanger 
ELSE IF Co I lectorWaterTemp>Mi nimufnForHeat Pump THEN 

ChosenMethod:=Col lee torToHeat Pump 
ELSE IF TankWaterTemp>Mi nimumForExchanger THEN 

ChosenHet hod :=TankToExc hanger 
ELSE IF TankWaterTemp>MinimumForHeatPump THEN 

ChosenMethod:=TankToHeatPump 
ELSE IF HeatedTankTemp>Mi nimumForHeat Pump THEN 

ChosenMet hod :=HeatedTankToHeat Pump 
ELSE Panic:=TRUE; Operat i ng : = FALSE; 
END 
ELSE (*no heating request*) ChosenMet hod : =NoMet hod 
END; C * W i t h CurrentData*) 
END; (*Det ermi neHethod) 

Figure 4-5. Test Version of Our Climate Control System 
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(************** MAIN PROGRAM *************************************) 

BEGIN 

StartUpSystem; 
Operat i ng :=TRUE; 
Panic:=FALSE; 

WHILE Operating DO C * w h i L e system is operating, do:*) 
BEGIN 

GetData(CurrentData) ; (*Get the temps, time, etc.*) 
StoreData(CurrentData) ; (*Store this data as record*) 
Determi neMethod(Cur rentData) ; (*this detects a panic*) 
OperateSystem(CurrentOata); 
END; (*whi le operating*) 
ShutDownSyst em (CurrentData); 
END. (*Hain Control Algorithm*) 



C*This is a dummy GetData module, with dummy GetDate 
and StoreData procedures, for use with HainControl 
module in testing phases. It only performs console 
input to get Celsius temperatures, the time of day, 
and the amount of sunlight (insolation) for the 
solar collector. Use PLHDATA module for real 
app I i cat i on . *) 

MODULE GetData; 

(* Interface specification common to all modules *) 

$INCLUDE(:M:INSPEC.SRC> 

PRIVATE GetData; 

(* end of interface specification *) 



PROCEDURE GetDataCVAR CurrentData :SystemData) ; 
BEGIN 

WITH CurrentData DO BEGIN 

WRITECType the thermostat setting in degrees Celsius:'); 

READLN(ThermostatSetting); WRITE LN; 

WRITECType the inside temperature reading in Celsius:'); 

READLNCInsideTemp); WRITELN; 

WRITECType the temperature of the collector water in Celsius:'); 

READLN(CollectorWaterTemp); WRITELN; 

WRITECType the temperature of the tank water in Celsius:'); 

REAOLN(TankWaterTemp); WRITELN; 

WRITECType the temperature of the heated tank water in Celsius: 1 ); 

READLN(HeatedTankTemp); WRITELN; 

WRITECType the hour of day, as in 04 or 24:'); 

READLN(Hour); WRITELN; 



Figure 4-5. Test Version of Our Climate Control System (Cont'd.) 
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yRITECType the minute of the hour, as in 01 or 59: '); 

REAOLN(Hinute); WRITELN; 

yRITECType the amount of sunlight, any integer will do for now:'); 

READLN<AmountOfSunlight); WRITELN; 
END; (*with CurrentData*) 
END; 

PROCEDURE StoreData(VAR CurrentData :SystemData) ; 
BEGIN 

(♦Dummy procedure, eventually will store CurrentData in a file*) 
WITH CurrentData DO BEGIN 

WRITELNC — '); 

WRITELNCCURRENT DATA IS AS FOLLOWS:'); 

WRITELNC- — '); 

WRITELNCThermostat Setting is ' .ThermostatSett i ng, ' C ' ) ; 

WRITELNC Inside temperature is ' , InsideTemp, ' C ' ) ; 

WRITELNCTemperature of collector water is ' , Col lectorWaterTemp, ' C ' ) ; 

WRITELNCTemperature of tank water is ' .TankWaterTemp, ' C ' ) ; 

WRITELNCTemperature of the heated tank water is ' .HeatedTankTemp, ' C ' ) ; 

WRITELNCTime of day is ' , Hour , ' : ' ,Mi nute) ; 

WRITELNCAmount of sunlight is ' , AmountOf Sunli ght ) ; 

WRITELN; (*a blank line*) 
END; (*with CurrentData*) 
END. 



(*This is a dummy Operation module, with dummy St a rt UpSyst em, 

ShutDownSystem, and Operat eSystem procedures , 

for use with MainControl moduie in testing phases.*) 

MODULE Operation; 

<* Interface specification common to all modules *) 

$INCLUDE(:F1 :INSPEC.SRC) 

PRIVATE Operation; 

(* end of interface specification *) 



PROCEDURE StartUpSystem; 
BEGIN 

WRITELN CCLimate system is now on.'); 

WRITELN (' '); 

WRITELN; 
END; 



PROCEDURE OperateSystem(VAR Current Data : SystemData) ; 
BEGIN 

WITH CurrentData DO BEGIN 

WRITELN ('= = = = = = = = === = = = = = = = = = = = = = = = = = = = = = = === = = = ' 

WRITELNCThe Climate System is now operating.'); 



'); 



Figure 4-5. Test Version of Our Climate Control System (Cont'd.; 
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WRITELN; 

WRITELNCThe Time is ' , Hour , ' : ' , Hi nut e) ; 

WRITELNCThe inside temperature is ' , Ins i deTemp, ' C ' ) ; 

WRITELNCThe thermostat setting is ', Thermostat Set t i ng ,' C ') ; 

WRITE( 'Method chosen to heat the building: '); 

CASE ChosenMethod OF 

Cot lectorToExchanger: WRITECSolar Collector to Exchanger'); 

Col lectorToHeatPump : WRITE (' So Lar Collector to Heat Pump'); 

TankToExchanger : WRITECTank to Exchanger'); 

TankToHeatPump : WRITECTank to Heat Pump'); 

HeatedTankToHeatPump: HRITEC ' Heated Tank to Heat Pump'); 

NoHethod : WRITECNo heat required'); 

END; 

WRITELN; 
WRITELN <'=============================================='); 

WRITELN; (+write a blank line.*) 
END; 
END; (*OperateSystem*) 



PROCEDURE ShutDownSystemCVAR CurrentData:SystemData) ; 

BEGIN 

WRITELNC ::::::::::::::::::::::::::::::::: ::::::::::::;:::' ); 

IF Panic THEN WRITELNC 'PANIC occurred, NORMAL shutdown.') 

ELSE WRITELNCNo panic occurred, ABNORMAL shutdown.'); 
WRITELNC :::::::::::::::::::::::::::::::::::::: :::::::::::') ; 

WITH CurrentData DO BEGIN 

WRITECLast chosen heating method was: '); 
CASE ChosenMethod OF 

Col lectorToExchanger: WRITECSolar Collector to Exchanger'); 
Col lectorToHeatPump : WRITECSolar Collector to Heat Pump'); 
TankToExchanger : WRITECTank to Exchanger 1 ); 

TankToHeatPump : WRITECTank to Heat Pump'); 

HeatedTankToHeatPump: WRITECHeated Tank to Heat Pump 1 ); 
NoMethod : WRITECNo heat required'); 

END; 

WRITELN; 

WRITELNC Thermostat Setting is ' .ThermostatSett i ng, ' C ' ) ; 
WRITELNC Inside temperature is ', Ins i deTemp, ' C ') ; 

WRITELNCTemperature of collector water is ' , Co I lectorWaterTemp, ' C ' ) ; 
WRITELNC 'Temperature of tank water is ' ,TankWaterTemp, ' C ' ) ; 
WRITELNCTemperature of the heated tank water is ' ,HeatedTankTemp, ' C ' ) ; 
WRITELNCTime of day is ' , Hour , ' : ' ,Mi nute) ; 
WRITELNC Amount of sunlight is ' , AmountOf Sun li ght ) ; 
END; (*wi th CurrentData*) 

WRITELNC :::::::::::::::::::::::::::::::::::::::::::::: ::::: :::'); 
WRITELN; 

WRITELNCGoodnight, Irene...'); 
END. CShutDownSystem*) 



Figure 4-5. Test Version of Our Climate Control System (Cont'd.) 
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A compiler is a program that translates your high-level language statements into machine 
code. Machine code, sometimes caiied object code, consists of the instructions that machines 
understand, whereas high-level language statements are instructions that humans under- 
stand. You must translate your high-level language statements into machine code by compil- 
ing your high-level language program. 

The Pascal-86 statements we typed (using CREDIT) are program source statements. We now 
have three source files: :F1 '.MAIN. SRC (for the MainContro! module), :F1:DUMDAT.SRC (for 
the dummy GetData module), and :F1:DUMOP.SRC (for the dummy Operation module). To 
translate these source statement modules into object code modules, we must compile each 
source module separately. 

The Pascal-86 compiler is supplied as the file PASC86.86. You invoke the compiler by using the 
RUN command to load and execute it in the "8086 side" (8086 execution mode) of the Series III 
system. The compiler usually produces two files: a listing file that contains a listing of the 
source program as the compiler saw it, and an object file that contains the actual machine 
code. The listing file usually contains a listing of the source statements, additional information 
about the compilation, and any errors that occurred during the compilation. 

For example, assume that MAIN. SRC, the first module, is in directory :F1:. The Pascai-86 
Compiler, PASC86.86, is also in directory :F1:. To compile this module, use the following 
command: 

-RUN : F1 : PASC86 :F1:MAIN.SRC DEBUG<c-> 

Let's analyze this command line. RUN is the command used to execute the program in the 
"8086 side" of the system. :F1:PASC86 is the pathname (without the ".86" extension) of the 
Pascal-86 Compiler (RUN supplies the ".86" extension). :F1:MAIN.SRC is the pathname for the 
MAIN. SRC module. Finally, DEBUG is a compiler control which tells the compiler to do 
something special (described later). 

This compilation produced two files: :F1:MAIN,LST is the listing file, and :F1:MAIN.OBJ is the 
object file that contains the object code. :F1 :MAIN .SRC is still in drive 1 . All of these files are in 
directory :F1 :, since that is where MAIN. SRC resides. 

Compiler controls tell the compiler to perform certain operations. Most controls have default 
settings that you do not have to specify. For example, the PRINT control is always on unless 
you specify NOPRINT. The PRINT control tells the compiler to produce a listing file, and use 
the name of the source file with an ".LST" extension (e.g., :F1:MAIN.LST). We could have 
used this version of the PRINT control: 

-RUN :F1:PASC86 : F1 : MA I N . SRC DEBUG PR I NT ( : LP : )<c r> 

This version of the PRINT control sends the listing to the line printer (:LP:), rather than creating 
:F1 :MAIN.LST as a listing file. 

Most of the compiler control default settings are useful for everyday compiling; that is, there is 
no need to learn how to use the compiler controls unless you want to do something special. 
For example, if you want the compiler to issue a warning message whenever it sees a non- 
standard Pascal statement (an Intel extension to the standard Pascal language), use the 
NOEXTENSIONS control. 
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We used the DEBUG control for a good reason: we want to do symbolic debugging while the 
program is running (using DEBUG-86, described in Chapter 7). You will want to do symbolic 
debugging during the first run of your program. Use the DEBUG control to prepare your pro- 
gram for symbolic debugging unless your program is extremely large. 

Most compiler controls can be specified in the invocation line as we show above. Most com- 
piler controls can also be imbedded in the source file— as control lines. For example, we used 
the INCLUDE control in a control line: 

$INCLUDE(; F1 : INSPEC.SRC) 

The INCLUDE control allows you to insert source statements from another file into this com- 
pilation. In this case, we wanted to insert the common interface specification (in 
:F1:INSPEC.SRC) into our compilation. The INCLUDE control saved us from typing the same 
interface specification for all three source files. 

We also need to compile the other modules separately. The following invocation line compiles 
our GetData module in DUMDAT.SRC: 

-RUN : F 1 : P AS C86 : F 1 : DUMDAT . S R C DEBUG<cr> 

SERIES III Pascal-86 V1 .0 

PARSE 

68 99 
***WARNING, input: '"END '' 
***was repaired to: "'END ; ' ' 
END PARSECt), ANALYZE(O), NOXREF, OBJECT 

COMPILATION OF GETDATA COMPLETED, 1 ERROR DETECTED. 
END OF Pascal-86 COMPILATION. 

The compiler displays a sign-on message, then the word "PARSE" to show that it is parsing 
the program statements. During the parsing phase, the compiler discovered an error— the 
"END " statement was not punctuated correctly. The compiler repairs our error, and con- 
tinues to compile. Each phase of compiling is displayed with a number in parentheses— the 
number of errors detected during the phase. The compiler only detected that one error, 
and since the error was easily repaired, the compilation was successful. We now have 
:F1 :DUMDAT.OBJ containing the object module. 

To compile our dummy Operation module, we use the following invocation line: 

-RUN : F1 : PASC86 : F1 : DUMOP . S R C DEBUG<cr> 



The listing files :F1 :MAIN.LST, :F1 :DUMDAT.LST, and :F1 :DUMOP.LST are shown in figure 4-6. 
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PRUURAiViiiNlu iN PA5CAL-S6 



se«ies-:i: p«scai-36/ *:si 



»4GE 

MaiNCONT 



Sourc« File :F1:N4IN.SBC 
3bj«ct Fila; ;F1:MAIN.28J 
Controls Sptcifi«d: DEBUG. 



STMT LINE NESTING 



16 
17 



19 

20 



20 
21 



= 

1 = 



11 


26 





1 = 


12 


27 





1 = 


15 


28 





1 = 


n 


29 





1 = 


15 


3C 





3 = 



34 
35 



39 

40 



22 


44 





= 


23 


45 





= 


24 


46 





= 



SOURCE TEXT; : Ft ; MA IN. SRC 
MODULE MainControi; 

(» Interface specification coumon to all .nodules *) 

SINCLuDECiFI :INSPEC.SRC) 

=U3LIC MainControi; (-section of inter f net SD»eif ieat ion« ) 

CD.NST £*dsclsr*tiens decl! 1 "*" publicly i« thj j "5tlyl»«) 



Mini* 
Minim 



niFor:xchsnger 
m F o p -1 9 a t P u m p 



35;t*degre«s Celsius*) 

n; 



TYPE (*def initions publicly defined ir* this module*) 

Air-Temperature = -2 . . 1 2 0; ( *c\ egr ees in Celsius*) 
WaterTamperature = 0. . 1 20; 
HeatingMethods =(CallectorToExchanger, 

Coll^ctorToHast^umD/ 

TankTo Exchanger/ 

TankToHeatPump, 

H&atedTankToMeatPunp, 

NoMethod) ; 



SystsmData 



= RECORD 

Chos enMethod 

InsideTgmp, 

Thsrmostat Setting 

CollsetorWatarTemp/ 

TtinkWaterTemo/ 

HeatedTankTemp 

A ti o u n 1 f S u n 1 i g h t 

H3UP 

Minute 
END <*Syste«iData*) ; 



: HeatingMethods/ 
: AirT»Tioef sturei 



^aterTemperature 
Integer; 
00. .2^; 
00. .59; 



VAR [»varisalss publicly defined in this module.*) 

operating. Panic : BOOLEAN; 

PUBLIC GetData; ("GetData Module containing GetData & StoreData*) 

PROCEDURE GetD?ta(VAR CurrentData : SystemData) ; 
PROCEDURE StoreDatatVAR CurrentDataiSystemOeta); 

=U3LIC Operation; (*0peration Module containing OperateSystem, 
StartUpSystem and ShutDown System*) 
PROCEDURE StartJDSysten; 

PROCEDURE OpsrateSystsmCVAR CurrgntData:SystemData); 
PROCEDURE ShutDoiunSystaiiCVAR Cur-r^ntDstBlSyStemDsta); 



PSG^RAM MainCcntrplCIM?ljT,3UTPJT); 
( * ±nc a f interfacs specification * ) 
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PROCEDURE Deter. -n ineMetiod(VAR Cur-sntOata : SystemData); 
3EGIN 

WITH Curr a nt0ata CD 
3EGIN 

I E InsideTemD<ThermostatSetting THEN 
5ESIN 

I c Collector-Wat erTemp>Minimum c or£xchanger TN = M 

ChosenMetnod:=CollectorToExchangBr 
ELSE IF Coll9CtorWaterTenip>MininiumForHeatPLimp THEN 

ChosenMethod:=CollectorToHeat D ump 
ELSE IF TankU3ter-Tefnp>Minimum?orE»changer THEN 

Chosen Me thod:=TankToExchanger 
ELSE IF TanktJater-Teinp>MiniinijinForHeat»u!Bp THEN 

Cho5enMethod:=Tank7oHeatPump 
ELSE IF HeatedTankTemp>Mir>imuuForHeatPurnp THEN 

Chosen Me thod:=HeatedTankToHeatPLnnp 
ELSE Panic: =TRUE; Dper-ating: = c ALSE; 
END 
ELSE C*no he-nting r-eques t*) ChosanMe t hod : =NoMethod 
ENiD; (♦riith CurrentData*) 
END; C'DeteriineMethadO 



Figure 4-6. Listings of Our Test Modules 
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CHAPTER 4 



MAIN PROGRAM 
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55 


' 47 
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56 


48 





1 



tartup 
perat i 

anic : = 
HIL= 

BEGI 



iystea; 

ig:=TRUE; 

: alse; 

>erating 00 <*while system is operating* do:*) 
t 
GetData(CurrentData); ( *Get the temps* time/ etc . *) 
StoreQatatCurrentData); C* Store this data as record*) 
Determine Me thod(CurrentDats); ("this detect s s panic*) 
OperatsSystemECurrentData); 
END; C*while opsrating*) 
Shut^ounSystemtCurrsntData); 
END. ( *Maifi Control Algorithm*) 



Summery Information: 



PROCEDURE 
DETERMINEHETHOD 



□FFSET CDCE SIZE DATA SIZE STACK SIZE 
Q311H 003 = * 1430 0006H 6 



94 Lines Read. 
Errors Detected . 



33X Utilization of Memory. 



SERIeS-III Pascal-36* 



Source File; :M :0UM0AT . SRC 
Object File: : F1 : DUMOAT . 06 J 
Controls Specified: CE3UG. 



32?D 3016H 



220 004CH 



STMT LINE NESTING 
1 10 



SOURCE r EXT: : C 1:DUMDAT.5RC 

(•This is a dummy GetOate module* with dummy Get Data 
ano StoreData procedures* for use with MainControl 
module in testing phases. It only performs console 
input to get Celsius temperatures* the time of day* 
and the amount of sunlight (insolation) for the 
solar collector. Jse PLH8613ATA modul* for real 
application . *) 



11 
12 



20 
21 



18 = 



11 


26 





i = 


12 


27 





1 ■ 


13 


28 


n 


1 = 


14 


29 





i = 



MODULE GetOata; 

t* Intarface spacificatio 



cannon to all modules *) 



iINCLU0EC:F1:lNS?EC.SRC) 

PU3LIC MainControl; (*section of interface specification*) 



C3NST (*declerations declared publicly in this module*) 



MinimumForEjcchanger 
MinimumFor'HeatPumo 



35;(*degrees Celsius*) 

13; 



YPE [*definitions publicly defined in this module*) 

AirTamoeratjre =-20..120;(*deqrees in Celsius*) 
HsterTemperature = 0. . 1 20; 
HeatingMethods =(CollectorToExchanger* 

CollectorToMeatPump* 

TankToEachanger* 

TankToHeat-'ump* 

HeatedTankToHeatPump* 

NoMethcd); 



SystemData 



= 5EC0RJ 

ChosenMethod 
In sideTemp* 
ThermostatSetting 
CollectorWaterTemp* 
TankWaterTemp* 
MeatedTankTemp 
AmountOf Sunlight 
Hour 
Minute 
END (*System0ata*); 



HeatingMathods; 
AirTe<rperatur«; 



MaterTemperature; 

Integer; 

00. .24; 

00.. 59; 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 
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17 
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42 
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44 
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23 


45 








24 


46 


a 






VAR C*variablas publicly defined in this module.*) 



C u i* r a n 1 3 3 1 ? 
Operating, Panic 



: SystemData; 

: boolean; 



PU3LIC GetData; (*&etOsta Module containing GetData & StoreData*) 

PROCEDURE GetDataCVAR CurrentData: SystemData) ; 
PROCEDURE StoreData'VAR CurrentData: SystemData) ; 

PU3LIC Operation; (*0peration Module containing Opera teSy stem*- 
StartUpSystem and ShutDouinSystem*) 
PROCEDURE StartUpSystem; 

PROCEDURE DperateSystemCYAR CurrentData: SystemData); 
PROCEDURE ShutDouinSyste-flitVAR CurrentData:SystemData); 



PRIVATE GetData; 

(* end of interface specification *) 
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PROCEDURE GetData (VflR Curr an tData: SystemData); 
BEGIN 

WITH CurrentData DO 3EGIN 

WRITEC'Type the thermostat setting in degrees Celsius:*); 

READLN'ThermostatSetting); WRITELN; 

WRITEC'Type the inside temperature reading in Celsius:*); 

RrADLNCInsirieTerop)/ WRITELri" 

WRITE'"Typ3 the temperature of the collector water in Celsius:*); 

REAQLN'CollectorWatsrTemp); WRITELN; 

WRITECType the temperature of the tank »ater in Celsius:")/ 

READLNCTankWaterTemp),* WRITELN; 

WRITEC'Type the temperature of the heated tank mater in Celsius:"); 

READLNtHeatedTankTemp); WRITELN; 

WRITEC'Type the hour of day* as in 04 or 24:'); 

RSADLN(Hour); WRITELN; 

WRITEC'Type the minute of the hour, as in 01 or 59: ") I 

REAOLN(Minute); WRITELN; 

URITEf 'Tyn« the annunt nf sunlight, any integer will do for now:"); 

R E AD LNCAmountOf Sunlight); WRITELN; 
END; C*uiith CurrentData*) 

end; 

PROCEDURE StoreData(VAR CurrentData : SystemData) ; 
3EGIN 

C* Dummy procedure, eventually will store CurrentData in a file*) 
WITH CurrentData DO BEGIN 

WRITELNi' 

WRITELNCCURRENT DATA IS AS FDLLDrfS: 

WRITELN' * *) * 

WRITELN t 'Thermostat Setting is '*ThermostatSetting,*C'); 

WRITELN' 'Inside temperature is ' , InsideTemp, *C* > ; 

WRlTELNt '"Temperature of collector mater is " /CollactorwaterTemp, " C ' ) ; 

WRITELNC'Temperature of tank aiater is ■* ,TankWaterTemp, *C ) / 

WRITELNt 'Temperature of the heated tank mater is *,HeatedTankTemp, "C ' ) ; 

WRITELNC'Time of ds/ is *, Hour ,*:*, Minute) ; 

WRITELN'* Amount of sunlight is *, AmountOf Sunlight) ; 

WRITELN/* (*a blank line*) 
END; C*uiith CurrentData*) 
END 



••WARNING* input: 
**«as repaired to 
70 58 



"END 
"END 



Sumnary Information: 

PROCEDURE 
ST0RE0ATA 
GETDATA 



104 Lines Read. 

1 Error Detected. 
33X Utilization of Memory. 



OFFSET CODE SIZE 
04DSH 0222H S46D 
C294H 0241m 577D 



DATA SIZE 



06F7H 17830 0000H 



STACK SIZE 
C010H 16D 
001 OH 160 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 
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CHAPTER 4 



SERIES-III Pascal-86/ X031 



Source File: :F1 : DUMDP . SRC 
□bject File: :F1:DUM3P.OBJ 
Control s Specified: DEBUG. 



STMT LINE NESTING 



SOURCE TEXT: :F1 :3JHQP.SSC 

(*This is a durcmy Doeration module/ mi tn dummy StartUpSystem/ 

ShutDonnSystem/ and OperateSystem procedures/ 

for use with Me> inCantrol module in testing phases. 

*) 
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MCDUL€ Operation; 

(* Interface so»c i f ic a tion common to all 



SINCLUDEC:=1:INSPi:C.SRC) 
PUSLIC MainControi; C*secti 



of interface specification*) 
("declarations declared publicly in this module*) 



um c or Exchanger 
umFor Hs a t Pump 



35; ("degrees Celsius*) 

13; 



Minim 

TYPE ("definitions publicly de fined in this -nodule*) 

AirTemoeraturs =-20. . 1 20; ( "degrees in Celsius*) 

^?terTemp?rature ~2. . 1 20; 

lasting "Istnocls =(Coll9etorToExchanger/ 

CollectorToH&etPurop/ 

TjinkToExchanger, 

T?nkToHeatPump/ 

HeotedTankToHeatPump/ 

MoMethod) ; 



SystsiiDetB = REC3RD 

ChosenMethod 
InsicfeTeiiDj' 
TnermostatSetting 
ColleetarWaterTeflip/ 
TankUaterTemp/ 
M sat sdTankTemp 
tmo-ntlf $unli5*nt 
Hour 
Minute 
ENC (*5y ste-Osta*) ; 

HP t*w?ri?i3l3s puoli:ly defined in this m 



CurrsntOst? 
Sperptmc/ = 



SystemData 

boolean; 



strata Module containing 



HeatinqHethods; 
jlirTemperature; 



WaterTemperature 
IntegBt",' 
00. .24; 
00. .59; 



?tOata & StoreDat?*) 



PROCEDURE GeOataWAR C urren t Da ta : Sy s te mGsta ) ; 
PROCEDURE Stor 9 D?ta(VAR Current0at?:System0sta); 



ij 3L IC Iteration 



joeration Module containing Operat eSy stem 
StartupSystem an* ShutDoumSystem*) 



PROCEDURE StartJpSystem; 

PROCEDURE OcersteSystsmCVAR Currents at a:SystemData); 

PRnC=DURE SnutCouinSysterc(VAR Current Data : SystemDsta > ; 



PRIVATE Operation; 

(* =nd of interface soec i f ic at ic n *) 



26 


18 





26 


19 


1 


27 


20 


1 


28 


21 


1 


29 


22 


1 


30 


23 


3 


31 


26 


n 


31 


27 


i 


32 


28 


? 


33 


29 


? 


34 


30 


? 


35 


31 


? 


36 


32 


? 


37 


33 


? 


38 


34 


2 



PROCEDURE StsrtJp System; 

BEGIN 

HRITSLN ("Climate system is noi* an.')i 
WEITELN t * *); 

w:riteln; 
end; 



PROCEDURE 3oerateSystem{Vflfi CurrentDatatSystemOata); 
3E3I\ 

J-Th Currgnt0?t? 12 3EGIN 

WR I T=LN ('============================================***); 

WRITELNt'Ths Climate System is now operating.'); 

W R I T E L N ; 

WRITELNCThe Time is */ Hour ,*:* /Minute) ; 

URITELN('Th= inside temoerature is '/InsideTemp/'O; 

WRITELNt'The thermostat setting is ' /Thermostat Set t ing# * C ') ; 

WRITE ( 'Methoc chosen to heat the building: ')/ 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 
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•♦•WARNING/ 


input : 


•••was repai 
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78 C 





Sumaary Infc 
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SHUT0OWNSYS 


EM 


OPERATESYST 


H 


STARTUPSYST 


H 


Total 






125 


Lines 


ead. 


1 


Error 


etected 


331 


utiliz 


tion of 



E ChosenMethod GF 

CollectorToExchanger 

CollectorTcHeatPu-np 

TankToExchanger 

T e n k T o H e a t P u m p 



WfllTECSolar Collector to Exch 
WRITEC'Solar Collector to Heat 
WRITEC'Tank to Exchanger-'); 
WRITEC'Tank to Neat Pump'); 



nger * ) ; 

Pump' ) / 



end; 

WRIT 
WRIT 
WRIT 



HeatedTarkToHeatPump: WRITE < 'Heated Tank to Heat 
: WRITEC'No heat required'); 



NoMethod 



eln; 

ELNC* 

eln; 



rite a blank line. 



end; 

END;<*0perateSystem<O 

PROCEDURE ShutDoanSystemCVflR C ur r entData: S y ste mDat a) ; 

3EGIN 

WRITELNC* :::::::::::::::::::::::::::::::::::;::::::::::::: *); 

IF Panic THEN WRITELNC 'PANIC occurred, NORMAL shutdown. * ) 

ELS; WRITELNt'No panic occurred/ ABNORMAL shutdown.'); 
WRITELN('::::::::::::::::::::;:::::::::::::::::::::i::::::*); 

WITH CurrentData DD 3EGIN 

WRITEC'Last chosen heating method iuas: '); 

CASE ChosenMethod OF 

CollectorToExchanger: WRITSCSolar Collector to Exchanger' 
CollectorToHeatPuirp : WRITE t 'Solar Collector to Heat Pump' 
TankToExchanger : WRITE ("Tank to Exchanger*); 
TankTo4eatPunp : WRITE ( 'Tank to Heat Pump'); 
HeatedTankToHeatPump: WRITEC 'Heated Tank to Heat Pump*); 
NoMethod : WRITEC'No haat required*); 

end; 
writeln; 

WRITELNC 'Thermostat Setting is '/ThermostatSetting/'O; 
wRITELNC'Inside temperature is '/InsideTemp/'C'); 
WRITELNC 'Temperature of collector mater is * /CollectorHaterTe 
WRITELNC'Tsmperature of tank mater is '* Tank WaterTemp/ *C ") ; 
WRITcLNC'Tewperature of the heated tank mater is '/HaatedTank 
WRITELNC'Tiire of day is "/ Hour , *;*, Minute) ; 
WRITELNC 'amount of sunlight is * / flmountOf Sunligh t) ; 
ENQ;£*uiiTn CurrentQataM 

writelnc: ::::::::::::::::::::::::::::::::::::: :;:::::::::: 

uriteln; 

WRITELNC 'Goodnight/ Irene...*).* 

END 



. C*ShutDoainSystem*) 



p/'O; 

Temp/ *C ') / 



069SH C398H 9200 
044CH 025SH 60C3 
03E2H 03SEH 943 



0010H 


16D 


0010H 


160 


001 OH 


16D 



26033 0003H 



Figure 4-6. Listings of Our Test Modules (Cont'd.) 



Summary 

We now have three Pascal-86 modules: MainControl, GetData, and Operation. Two of these 
modules, GetData and Operation, are dummy versions that do not interact with any hardware 
except the Series III system; we will use them for examples in subsequent chapters. The Main- 
Control module can remain unchanged even in our final application. 

The final application will probably use an 8088 processor. In Chapter 5, we show PL/M-86 pro- 
cedures we can use to obtain data from thermocouples via the input/output ports on the 8088. 
Since you probably do not have prototype climate control hardware with an 8088, we will not 
include these procedures in our test versions for execution on a Series III system; never- 
theless, they are good examples of PL/M-86 procedures. 

Our Pascal-86 modules cannot run by themselves on a Series III. Certain built-in procedures 
(like WRITELN and READLN) rely on run-time support software, which consists of public 
modules that contain the software needed to perform console input/output and other opera- 
tions. In Chapter 6, we'll show you how to link the run-time support libraries to these Pascal-86 
modules to make them executable on a Series III system. 
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CHAPTER 5 
PROGRAMMING IN OTHER LANGUAGES 



"It is possible by ingenuity and at the expense of clarity ... [to do almost anything in any 
language]. However, the fact that it is possible to push a pea up a mountain with your nose 
does not mean that this is a sensible way of getting it there." 

—Christopher Strachey 
NATOSummerSchool in Programming 



The Intellec Series III system also supports PL/M, FORTRAN, and assembly language pro- 
gramming for iAPX 86,88 and 8080/8085 applications. In the previous chapter we used Pascal-86 
for our main control algonthr 
for other modules. 



ANOTHER LOOK AT CHOOSING LANGUAGES FOR MODULES 

In the best of all possible worlds, would we all speak the same language? Tower of Babel 
enthusiasts would have us coding our entire program in one language— but which? We do not 
want to return to the stone age and lose cultural variety and language diversity. There are 
expressions that can only be expressed in Chinese characters, and there are problem-solving 
statements that are better expressed in PL/M than in FORTRAN. A good carpenter should 
have more tools than, nails and a hammer; a good programmer should be fluent in several pro- 
gramming languages. 

IllUnn wai ■ f^Aninn nn nlnnrltkm r\ .-, e- ! j-f t-i !+ nolnn n o^mfnrt-ihla hn/in^/IO Vnn ijmll fi r\A thfl 

¥V I ici i ywu UCOiyi i Oil i Gliy_fi HI ill i, UCQiyii n UOiny a vwi n i vi lauic ict i iywc*y<s. ■ vu ■« ■■■ unu uiv 

algorithm easier to debug, and you will notice the paradigm inherent in your design. When you 
are ready to translate your algorithm into code for a computer, use the language best suited for 
the paradigm. 

If you have many algorithms that must work together, you should keep the communication 
among them simple. With simple interfaces, you can code each algorithm in the language best 
suited for the algorithm. In some cases, you can use an algorithm that has already been 
developed for use in another application— another reason for keeping your algorithms and 
interfaces simple. With the Intellec Series III development tools, you can link these algorithms 
in different configurations to form several applications. 

For example, we chose to write our main control algorithm for the climate system in Pascal-86. 
We still need an algorithm for retrieving the data and converting it to Celsius temperatures. We 
decided to write a simple Pascal-86 routine for testing purposes only (this routine only 
retrieves the data from the Series III console); however, our final product will rely on ther- 
mocouples and other sources of data, and we will need an algorithm to convert thermocouple 
voltages to degrees Celsius. Fortunately, we already have a routine in PL/M-86 that performs 
this activity, and we can save development time and money by using it. 
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Chapter 5 



PROGRAMMING IN PL/M-86 

PL/M is renowned for its structure and versatility. PL/M is one of the only structured high-level 
languages that allow you to manipulate bits with AND, OR, and shift (SHR for "shift right" and 
SHL for "shift left") operations. PL/M's data types are not as strictly enforced as 
Pascal's— PL/M's BYTE, WORD (ADDRESS), and POINTER types have loose definitions so 
that you can use them for different kinds of data. For this reason, PL/M is easier to use for 
system programming (designing computer systems or control mechanisms), yet harder to use 
in application programming where enforced data typing makes it easier to write error-free 
programs. 

In our climate control system, there are two routines whose paradigms lend themselves easily 
to PL/M: the routine to get BCD digits from a thermostat device and convert them to a Celsius 
temperature, and the routine to get voltage data from a thermocouple and convert the voltages 
to Celsius temperatures. Figure 5-1 shows the algorithm and the actual PL/M-86 code for the 
routine to retrieve data from a thermostat device. You are already familiar with comments in 
Pascal programs that occur between the (* and *) symbols; in PL/M, comments occur between 
the /* and */ symbols. 

A PL/M typed procedure is like a Pascal or FORTRAN function: it is called in an assignment 
statement (as in X:=FUNCTION(Y)), and it returns a value (X receives the value of 
FUNCTION(Y)). In figure 5-1, the typed procedure THERMOSTAT$SETTING$FROM$PORTS 
returns the value of THERMOSSETTING, which it computes by accessing the two ports 
HIGH and LOW and converting the BCD digits to a Celsius temperature. The value of 
THERMOSSETTING is assigned to ThermostatSetting in the GetData procedure's assignment 
statement: 

TherrnostatSetting:=THERK0STAT$SETTING$FR0M$P0RTS(StatPcrt1,StatPort2); 



PLMDATA: Dp; 

/* This module holds the procedures THERHOSTATSSETT I N G$ F ROMSPORTS , 
TEMP$DATA$FROM$PORTS, and INTERPOLATE (a procedure used by 
TEMP$DATA$FROM$PORTS) . These will be used in the final testing 
phase of the climate control system (when prototype hardware is 
available). For intermediate testing (and examples in this book), 
do not use this module; use the dummy GetData module. */ 

/* 

The algorithm for getting a Celsius temperature from a thermostat 

device that can send BCD digits to two ports of the 8088: 

The final version of the GetData procedure (to be 
written in Pascal-86) will use this statement to get 
the thermostat reading: 

ThermostatSetting:=THERMOSTAT$SETTING$FROM$PORTS(StatPort1,StatPort2); 

A PL/M-86 typed procedure called THERMuSTAT$SETTING$FROM$PORTS 
receives two port numbers from GetData: StatPortl and StatPort2. 
THERMOSTAT$SETTING$FROM$PORTS must access these ports, convert 
the BCD digits to a Celsius temperature, and return the 
temperature . 

Figure 5-1. The PL/M-86 Typed Procedure THERMOSTAT$SETTING$FROM$PORTS 
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INPUTS 



THERM0STAT$SETTING$FR0M$P0RTS: 

Formal parameters HIGH and LOW receive port numbers as actual 
parameters . 

Input ports HIGH and LOW: Three BCD digits for the thermostat setting: 

Port HIGH, bits 3-0: hundred's digit 
Port LOW, bits 7-4: ten's digit 
Port LOW, bits 3-0: unit's digit 



OUTPUT 



THERMOSTAT$SETTING$FROM$PORTS: Return WORD with Celsius temperature 
*/ 

/*Here is the typed procedure THERM0STAT$SETTING$FR0M$PORTS : */ 

THERMOSTAT$SETTING$FROM$PORTS: 

PROCEDURE (HIGH, LOW) WORD; 
DECLARE (HIGH, LOW) WORD; 

DECLARE (INSPORTSHIGH, IN$P0RT$L0W) BYTE; 
DECLARE TH ERMOSSETT I NG WORD; 
DECLARE (HUNDREDS, TENS, UNITS) BYTE; 

IN$P0RT$HIGH = INPUT(HIGH); 

IN$P0RT$L0W = INPUT(LOW) ; 

HUNDREDS = I NSPORTSH I GH AND 0O001111B; 

TENS = SHR(IN$PORT$LOW, 4); 

UNITS = IN$PORT$LOW AND 00001 1 1 1 B; 

THERMOSSETTING = UNITS + 10*TENS + 1 00*HUNDREDS ; 

RETURN THERHOSSETTING; /*this returns the temperature*/ 
END THERM0STAT$SETTING$FR0M$PORTS; 



More procedures foltov—see figure 5-2. 
Figure 5-1. The PL/M-86 Typed Procedure THERMOSTATSSETTINGSFROMSPORTS (Cont'd.) 

There are notable similarities between Pascal and PL/M. Most notable are the logical struc- 
tures that can occur in both languages— both have the DO WHILE and IF-THEN-ELSE con- 
structs. The languages are lexically and syntactically different in data declarations, procedure 
headings, and other constructs, but they are logically similar. By conforming to a logical struc- 
ture, you make your program readable and easier to debug. 
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The data declarations in both languages are very similar. In both languages, you must declare 
your data identifiers to be of some type before using the identifiers. In Pascal, you define data 
types or use predefined Pascal data types. In PL/ M, you are restricted to the acceptable PL/ M 
data types, but they are loosely defined. A BYTE can be any value expressed in eight bits, and 
a WORD in PL/M-86 (ADDRESS in PL/M-80) can be any value expressed in sixteen bits; both 
types of values are treated as unsigned integers. PL/M-86 offers several more types: INTEGER 
(for signed integers), REAL (for floating point numbers), and POINTER (for 8086 and 8088 
addressing). 

PL/M-86 offers many features useful for system programming— arrays and structures, based 
variables, easy type conversion, built-in procedures for manipulating strings, setting and 
disabling interrupts, accessing the 8086 or 8088 hardware stack pointer and base registers, and 
performing bit shift and rotate operations. We use the AND and SHR operators in the 
THERMOSTAT$SETTING$FROM$PORTS procedure in figure 5-1 . 

We also use PL/M-86 procedures to obtain temperature data from thermocouple voltage 
data, the GetData procedure in our GetData module (written in Pascal-86) calls the 
PL/M-86 procedure TEMP$DATA$FROM$PORTS to obtain the temperatures InsideTemp, 
CollectorWaterTemp, TankWaterTemp, and HeatedTankTemp using these assignment 
statements: 

InsideTemp:=TEMP$DATA$FR0MSP0RTS(InsidePort1 ,InsidePort2); 
Col I ectorWaterTemp:=TEMP$DATA$FROM$PORTS (Collect Port 1 ,CollectPort2); 
TankWaterTemp : =TEHP$0ATA$FR0H$P0RTS (TankPortl ,TankPort2); 
HeatedTankTemp:=TEMP$DATA$FR0M$P0RTS(HotTankPort1 ,HotTankPort2); 

In all four assignments, the Pascal-86 identifiers on the left side of the := symbols receive the 
values from the PL/M-86 typed procedure TEMP$DATA$FROM$PORTS. Figure 5-2 shows 
TEMP$DATA$FROM$PORTS. 



/* 

The typed procedure TEMP$DATA$FR0M$P0RTS receives two port numbers: 
HIGH and LOW. These ports are accessed for the binary ADC output 
from a thermocouple device: HIGH gets the high-order 8 bits, and 
LOW gets the low-order 8 bits. TEMP$DATA$FR0M$P0RTS then uses 
the typed procedure INTERPOLATE, a routine that interpolates a 
Celsius temperature from a thermocouple voltage using two tables. 
TEHP$DATA$FR0M$P0RTS sends a WORD with the input voltage to 
INTERPOLATE. INTERPOLATE returns a Celsius temperature, which 
is returned tu the GetData procedure (written in Pascal 86). 

INPUTS 



TEHP$DATA$FR0M$P0RTS: 

Formal parameters HIGH and LOW receive port numbers as actual 
pa ramet e rs . 

Input port HIGH: Binary ADC output of thermocouple, high-order 8 bits 
Input port LOW: Binary ADC output of thermocouple, low-order 8 bits 

Figure 5-2. The PL/M-86 Typed Procedures TEMP$DATA$FROM$PORTS and INTERPOLATE 
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OUTPUT 



TEMPSDATASFROMSPORTS : Return WORD with temperature in Celsius 

*/ 

/* INTERPOLATE is declared first, then its calling procedure 
TEMPSDATASFROMSPORTS is declared. */ 

/* INTERPOLATE is a typed procedure that receives thermocouple 
voltage and returns temperature in Celsius using an 
interpolation routine. */ 

INTERPOLATE: 

PROCEDURE(VOLTSIN) WORD; 

DECLARE VOLTSC*) WORD DATA CO , 51 , 1 02 , 1 54 , 206 , 258 , 365 , 472 ) ; 
DECLARE T$CEL(*) WORD DATA (0 , 1 , 20 , 30 , 40 , 50 , 70 , 90 ) ; 
DECLARE (I, VOLTSIN, NUMERATOR) WORD; 

1 = 0; 

IF VOLT$IN = THEN RETURN TSCEL(I); 

DO WHILE VOLTSIN > VOLTS(I); 

1=1+1; 
END; 

/* Shift for rounding, and return Celsius temperature */ 
NUMERATOR = SHL ( (VOLTSIN-VOLTS ( 1-1 ) ) * (TSCE L( I ) - TSCE L( 1-1 ) ) , 1); 
RETURN TSCEL C 1-1 ) + SHR (NUMERATOR/ (VOLTS ( I ) - VO LTS ( 1-1 ) ) +1 , 1 ) ; 

END INTERPOLATE; 

/ft*****************************************************************/ 

/* TEMPSDATASFROMSPORTS */ 

TEMP$DATA$FROM$PORTS: 

PROCEDURE(HIGH,LOW) WORD; 
DECLARE (HIGH, LOW) WORD; 
DECLARE IN$PORT$HIGH WORD; 
DECLARE INSPORTSLOW BYTE; 
DECLARE (THERMOCOUPLESOUTPUT, TEMPERATURE) WORD; 

INSPORTSHIGH = INPUT (H I GH) ; 

INSPORTSLOW = INPUT(LOW) ; 

THERMOCOUPLESOUTPUT = S H L ( I NSPORTSH I GH , 8) OR INSPORTSLOW; 

TEMPERATURE = I NTERPOLATE (THERM0COUP LESOUTPUT) ; 

RETURN TEMPERATURE; 

END TEMPSDATASFROMSPORTS; 



Figure 5-2. The PLM-86 Typed Procedures TEMP$DATA$FROM$PORTS 
and INTERPOLATE (Cont'd.) 
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Let's look closely at the following statement, which appears in the procedure 
TEMP$DATA$FROM$PORTS shown in figure 5-2: 

THERMOCOUPLESOUTPUT = SH L ( IN$PORT$H I GH , 8) OR IN$P0RT$L0W; 

The variable IN$PORT$HIGH was declared as a WORD with 16 bits, and the variable 
IN$PORT$LOW was declared as a BYTE with 8 bits. The thermocouple voltage data from an 
analog-to-digital converter can have up to 13 bits, but our procedure was originally written to 
access 8-bit ports. To assemble the 13 bits, we use the SHL (shift to the left) built-in procedure 
to shift the rightmost 8 bits of IN$PORT$HIGH to the left, and we OR this shifted value with 
IN$PORT$LOW. 

The INTERPOLATE procedure uses a more complicated expression that includes both the SHL 
(shift to the left) and SHR (shift to the right) built-in procedures. The INTERPOLATE procedure 
also uses two tables, or arrays. They are declared in the following statements: 

DECLARE V0LTS(*) WORD DATA ( , 51 , 1 02 , 1 54 , 206 , 258 , 365 , 472 ) ; 
DECLARE T$CEL(*) WORD DATA ( , 1 , 20 , 30 , 40 , 50 , 70 , 90) ; 

In both declarations, the arrays VOLTS and TSCEL are assigned actual values through the use 
of DATA initializations. The DATA initialization allocates storage for the array and assigns the 
values specified in parentheses after the word DATA in a single step. 

The values chosen for the VOLTS array are from the National Bureau of Standards; they repre- 
sent the output (in millivolts) of type J thermocouples that corresponds to the Celsius 
temperature range assigned to the TSCEL array. For example, a thermocouple output of 102 
millivolts should correspond roughly to 20 degrees Celsius. The INTERPOLATE procedure 
uses these tables to arrive at an approximate Celsius temperature value for a known ther- 
mocouple output value. Our calculations would be more accurate if the ranges between values 
within each table were smaller. 

Compiling a PL/M-86 program is very similar to compiling a Pascal-86 program. We execute the 
PL/M-86 compiler in the 8086 execution environment by using the Series III RUN command. 
The PL/M-86 compiler is supplied in the file PLM86.86 on the PL/M-86 disk. We inserted a copy 
of this disk into drive 1 (we also put our source program on the same disk). In the following 
example, we execute the PLM86.86 using the RUN command. We do not have to supply the 
".86" extension, since RUN already assumes that the file you specify has that extension. The 
following example shows the RUN command line for compiling the module PLMDATA, which is 
in a source file called PLMDAT.SRC (PLMDAT.SRC and the PL/M-86 compiler are both in direc- 
tory :F1:): 

-RUN :F1:PLM86 : F1 : P LMDAT . S RC CODE LARGE<cr> 

This compiler invocation produces two output files: :F1:PLMDAT.OBJ to hold the compiled 
object module, and :F1:PLMDAT.LST to hold the listing. The listing is shown in figure 5-3 (in the 
next section). 

Two compiler controls, CODE and LARGE, were also specified. The CODE control tells the 
compiler to list the approximate assembly language instructions that would be necessary to 
implement the PL/M-86 statements— this is useful for many reasons, some of which are 
described in the next section. The LARGE control is needed here because Pascal-86 modules 
are compiled with a default size control that is equivalent to the PL/M-86 LARGE model. All 
modules of a program must conform to the same size control, so our PL/M-86 module must be 
compiled as a LARGE module to conform to the default size of Pascal-86 modules. 



68 



Other Languages 



You need to know more about the PL/M-86 language and compiler than the brief introduction 
provided in this guide. Intel provides a manual for the PL/M-86 language and compiler 
(PL/M-86 User's Guide for 8086-Based Development Systems). Intel also supplies two manuals 
for PL/M-80 program development (PL/M-80 Programming Manual and ISIS-II PL/M-80 
Compiler Operator's Manual) in the 8085 execution environment of the Series III. For tutorial 
information on the PL/M language, see A Guide to PL/M Programming For Microcomputer 
Applications by Daniel McCracken (listed in the Bibliography). 



PROGRAMMING IN 8086/8087/8088 ASSEMBLY LANGUAGE 

So far we have described high-level languages that are translated by compilers into machine 
code; namely, Pascal-86 and PL/M-86. Another high-level language not described in this book 
is FORTRAN, which is also translated by a compiler into machine code. Other high-level 
languages like BASIC-80 are translated by interpreters into machine code. 

An assembly language program is translated into machine code by an assembler. Intel pro- 
vides the 8086/8087/8088 Macro Assembler, which is described in this section, to translate 
8086/8087/8088 Assernb!" Lan n ua n e urograms. It is called a macro assembler because it will 
also translate macro definitions written in the Macro Processor Language, which is described 
with the 8086/8087/8088 Assembly Language. 

The common denominator of all these languages is the machine code, which is the binary 
language of ones and zeros that only the processor can "speak" well. The following is an 
example of machine code, with comments to explain what action each code performs: 

Memory Address Memory Contents Comments 

(Hexadecimal) (Binary) (English) 

00000 11100101 Read word into reg. AX... 

00001 00000101 ...from input port 5. 

00002 01000000 Increment contents of AX. 

00003 11100111 Write word from reg. AX... 

00004 00000010 ...to output port 2. 

00005 11101011 Repeatbyjumping... 

00006 11111001 ...back seven bytes. 
00007 

This machine code (sometimes called object code) is the code that the processor executes. 
All languages are eventually translated into this type of code. 

A program written in assembly language is a symbolic representation of machine code. The 
relation between assembly language instructions and the resulting machine code is usually 
very obvious; the relation between statements in a high-level language and the resulting 
machine code is often not obvious (with some exceptions in the PL/M-86 language). 

Assembly language gives you complete control over the resulting machine code and thereby 
allows you to generate very efficient machine code. There are times when this control is 
desirable, and other times when you want to be free of such details. Most high-level language 
compilers are efficient enough for microcomputer applications; in fact, some compilers are 
more efficient than most humans. 
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Assembly language is the closest language to machine code, but it does allow you to use sym- 
bolic names. Here is a rewrite of the machine code instructions shown before, using 
8086/8087/8088 Assembly Language (comments follow the semicolons): 

CYCLE: IN AX, 5 ;Read word from port 5 into reg. AX. 

INC AX ; Increment the contents of reg. AX. 

OUT 2,AX ;Write word from reg. AX to port 2. 

JHP CYCLE ;Jump to beginning and repeat. 

This program fragment is simpler to read because it uses symbolic names like CYCLE instead 
of binary and hexadecimal numbers. The 8086/8087/8088 Assembly Language also provides 
sophisticated code and data structuring mechanisms usually found only in high-level 
languages. The assembler enforces some consistency in data types to prevent inadvertent 
errors, yet it also allows some deliberate ways to override data types. 

The 8086/8087/8088 Macro Assembler also processes macro definitions. A macro is a short- 
hand function name for a string of instructions. First you define a macro, using the Macro Pro- 
cessing Language, to be a sequence of assembly language instructions. Once defined, you 
can specify the macro name in an assembly language program, and the macro assembler 
automatically replaces the macro name with the actual sequence of instructions from the 
definition. Using this facility you can create many macros and use them in many programs. 

There are many times when an assembly language version of a routine runs faster and takes 
up less space than a high-level language version. Intel's compilers can produce a listing of the 
assembly language instructions that are approximately the ones you would use to implement 
the compiled high-level language routine in assembly language. For example, we used the 
CODE control in the previous section when we compiled the PL/M-86 program PLMDAT.SRC. 
The CODE control produced the listing shown in figure 5-3. 

PROGRAMMING FOR THE SERIES III ENVIRONMENT 

Assembly language and PL/M give you more direct control over the processor's operation; 
however, the Series III system gives you a set of operating system procedures called 
primitives (or service routines) that your programs can use to perform standard operations. By 
using these primitives, you save development time in two ways: first, you save time by not 
implementing the standard operations yourself; and second, you save time in the future by 
writing programs that will always be compatible with future Intel operating systems. 

In Pascal-86, you are supplied with built-in procedures that automatically call these primitives. 
You link the run-time libraries that contain the primitives to your Pascal-86 modules, and you're 
all set to run the program on a Series III system. The program will also run on future Intel 
operating systems, since the only changes it would need would be contained in the run-time 
libraries; that is, you would have a different set of run-time libraries for each system, but your 
basic program modules would remain unchanged. 

To have this modularity in PL/M or assembly language, you simply use the set of primitives 
described in the Intellec Series III Microcomputer Development System Programmer's 
Reference Manual, and then link in the appropriate system libraries to your PL/M or assembly 
language modules (as described in the IAPX 86,88 Family Utilities User's Guide). For future 
Intel operating systems, you only need to use a different set of system libraries. Your basic 
program modules would remain unchanged. 

The next chapter describes the linking and locating operations for our Pascal-86 modules. 
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0L/M-36 COMPILE' 



IS:S-II PL/M-36 Hi 21 C-M?ILiTICN = MOSUL E 
OBJECT MODULE PLACED IN PLMEX.G5J 
C3.M»ILER INVOKES 3Y: 3LM3S =>LM = X.S*C C3DE 



INPUTS 



THE RMCSTATSSETTINGSFRGM SPORTS: 

Formal psrametsrs HIGH and L"W rstsivs oort numbers as actual parameters. 

Input ports HIGH and LOW: Three 3CD digits for the thermostat setting: 

Port HIGH, bits 3-0: hundred's digit 
Port IDA, bits 7-4: ten's digit 
Port LOW/ bits 3-0: unit's digit 

TEMP5DATA$FR0MSP3RTS: 

Formal parameters HIGH and LOW receive port-numbers as actual parameters. 

Input port HIGH; Binary HOC output of thermocouple^ high-order 8 bits 
Input port LOW: 5inary ADC output of thermocouple* loin-order 8 bits 

OUTPUTS 

THERM0STAT$SETTING$FR3M$P0RTS: Return WORD with setting in Celsius 

T=MP$DATfi$FROM$PuRT$: Return W03D mith temperature in Celsius 

*/ 



; STATEMENT ft 2 
THERMDSTATSETTINGFROMPORTS PROC NEAR 

0000 55 PUSH BP 

0001 8BEC MDV BP,SP 
PROCEDURE (HIGH, LOW) WORD; 

3 2 DECLARE (HIGH,. LOW) WORD; 

4 2 DECLARE CINSPOSTSHIGH/ IN$P0RT$L0W) BYTE," 

5 2 DECLARE THERMDSSETTING WORD; 

6 2 DECLARE (HUNDREDS' TENS* UNITS) BYTE; 

7 2 INSP0RTSHIGH = INPUT (HIGH) ; 

; STATEMENT * 7 
0003 8S5606 MOV DX,CBPJ.HIGH 

0006 EC IN OX 

0007 88060COO MOV INPORTHIGH, AL 

8 2 IN$P0ST$L0W = INPUT(LOH); 

; STATEMENT ft 8 
000B 835604 MOV DX#CBP].L0H 

000E EC IN OX 

000F 88060000 MOV INPORTLOW/AL 

9 2 HUNDREDS = IN$PQRT$HIGH AND 000011113; 

; STATEMENT * 9 
0013 8A060C00 MOV AL, INPORTHIGH 
0017 SQEOOF AND AL/OFH 

001 A 88060 E00 MOV HUNDREDS^AL 

10 2 TENS = SHRCINSPORTSLQkf 4); 

; STATEMENT ft 10 
001E 8A060D00 MOV AL/INPQRTL3W 
0022 B104 MOV CL,4H 

0024 02E8 SHR AL/CL 

0026 83060FOG MOV TENS^AL 

11 2 UNITS = INSPORTSLOW AND OQ001 1 1 1 B ; 

; STATEMENT * 11 
002A 8AO60D00 MOV AL,INPORTL0W 
002E S0E00F AND AL,0FH 

0031 88061000 MOV UNIT5/AL 



Figure 5-3. Listing of PLMDATA with the CODE Control 
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THERMQSSETTING = UNITS + 10*TENS + 1 00 *H|JNDR EDS ; 
; STATEMENT * 12 



0035 


3A060F00 


MOV 


AL/TENS 


0039 


9104 


MOV 


CL/OAH 


003 B 


F6E1 


MUL 


CL 


0030 


8AOE1000 


HQV 


CL/UNITS 


0041 


B5O0 


MOV 


CH/OH 


0043 


03C1 


SOD 


AX/CX 


0045 


50 


RUSH 


ax ; 1 


0046 


SA060EOO 


MOV 


AL, HUNDREDS 


0044 


S164 


MOV 


CL/64H 


004C 


F6E1 


MUL 


CL 


004E 


59 


p-]P 


ex ; 1 


004F 


03C1 


ADO 


AX/CX 


0051 


89060000 


MOV 


THERMOSETTING, AX 




RETURN THERMOSETTING,* 










; STATEMENT 


0055 


50 


POP 


3P 


0056 


C20400 


RET 


41 



14 2 END THERMOSTATJSETTINGSFROMSPjRTSJ 

; STATEMENT fl 14 
THERMOSTATSETTINGFROMPORTS ENDP 

/* Another typed procedure to return temperature data/ which 
usas the INTERPOLATE typed procedure. */ 

/* INTERPOLATE is a typed procedure that receives thermocouple 
voltage and returns temoerature in Celsius using an 
interpolation routine */ 

15 1 INTERPOLATE: 

; STATEMENT * 15 
INTERPOLATE D R0C NEAR 
005? 55 PUSH 6° 

005A 55EC MOV BP/SP 

PROCEOURE(VOLTSIN) WORD; 
1° 2 OECLARE VOLTSC*) WORD OATA (0. 5 1 / 102-1 54, 205/253/ 365/472) ; 

17 2 OECLARE TSCELC*) WORD DAT A {0/10/ 20,30/40/50/70/90) ; 

18 2 OECLARE (1/ VOLTSIN, NUMERATOR) WORD; 

19 2 I = o; 

; STATEMENT # 19 
005C C70602000000 MOV I, OH 

20 2 1= VDLTSIN<1 THEN RETURN TSCEL(I); 

; STATEMENT p 20 
0062 S17EO40100 CMP [3P] .VOLTIN, 1 H 
0067 7203 J3 $*5H 

0069 E90000 jmp 31 

/" STATEMENT A 21 
006C BBOOOO NOV BX,OH 

006F 01E3 SHL BX,1 

0071 8B371000 MOV AX.TCELCBX] 
D075 5D POP BP 

0076 C20200 RET 2H 

31: 

22 2 DO WHILE VCLTSIN > VOLTS(I); 

; STATEMENT # 22 
02: 
0079 8B1E0200 MOV SX/I 

0070 D1E3 SHL BX/1 

007F 8B4604 MOV AX, C3PJ . VOLTIN 

0082 38870000 CMP AX, VOLTSCBX] 

0086 7703 JA $ + 5H 

0088 E9O7O0 JMP S3 

23 3 I = I * 1; 

008B FF060200 INC I 

24 3 eno: 



0OSF 



/• STATEMENT # 23 
/' STATEMENT # 24 



33: 



/* Shift for rounding, and return Celsius temperature */ 
NUMERATOR = SHL( ( VOLT S IN-VOLTS ( 1-1 ) ) » (TSCEL CI) -TSCELd-1 ) ) , 
; STATEMENT n 25 
SX/I 

ex 

BX/1 

AX,V0LTSt8XJ 

CX/fBPJ. VOLTIN 

CX,AX 

SI, I 

SI/1 



0092 


8B1E0200 


MOV 


0096 


48 


DEC 


0097 


01E3 


SHL 


0099 


8BB70000 


MOV 


0090 


834E04 


MOV 


OOAO 


2BC8 


sua 


00A2 


8B360200 


MOV 


00A6 


01E6 


SHL 



Figure 5-3. Listing of PLMDATA with the CODE Control (Cont'd.) 
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29 


2 


30 


2 


31 


2 


32 


2 



00«S 


8B971000 


MDV 


dx,tcslcbx: 


OOAC 


8B9C1000 


MDV 


BX,TCELCSI3 


0080 


2B0A 


SUB 


BX,0X 


3062 


50 


PUSH 


IX ; 1 


0OS3 


B9C8 


MOV 


AX/CX 


00 B 5 


52 


PUSH 


ox ; 2 


00B6 


F7E3 


MUL 


SX 


00B8 


D1E0 


SHL 


AX,1 



0CS4 S906D400 HOW N JMERATOR* OX 
2 RETURN TKELU-1) + SHR t NUMERAT3R/ (VOLTS CI >-WOLTS (1-1) > + 1 * 1># 

; STATEMENT * 26 



OOBE 


839C0000 




MCV 


SX/VOLTSCSn 


00C2 


5A 




pap 


ox 


; 2 


00C3 


59 




POP 


ex 


; 1 


00C4 


2B09 




SU3 


BX/CX 




00C6 


52 




PUSH 


OX 


; 1 


00C7 


31D2 




XDS 


DX,DX 




00C9 


F7F3 




OIV 


3X 




DOCB 


40 




INC 


flx 




OOCC 


01ES 




SHR 


AX,1 




OOCE 


59 




POP 


cx 


; 1 


OOCF 


03C1 




ADD 


AX/ CX 




0001 


5D 




POP 


BP 




0002 


C20200 




RET 


2K 




end interpolate; 


















; STATEMENT 






INTERPOLATE 


ENDP 





TEMPSDATASFHOMSPQRTS: 

; STATEMENT # 2S 
T£MPDATAFR3HPQilTS PRDC NEAR 

0005 55 PUSH BP 
00D6 88EC HOV BP,$P 

PROCEDURECHIGH/LOW) UORD; 
DECLARE (HIGH, LOW) HDRD; 

DECLARE INSPGRTSHIGH W3RD; /* ADDRESS in McCrack»n*s bo 
DECLARE INSPQRTSLOM BYTE; 
DECLARE CTHERMDC3UPLES3JTPUT, TEMPERATURE) wORO; 

INSPDRTSHIGH = INPUTCHIGH); 

; STATEMENT # 33 
OODS SB5606 MOV DX, CBP} .HIGH 

0006 EC IN DX 
ODOC B400 MOV am, OH 

OODE 89060600 HOV INPORTHIGH, AX 
INJPORTSLOW = INPUTtLOW); 

; STATEMENT V 34 



UUC£ 9DJOU» "U» u a # i. a ■" J « uu n 

00E5 EC IN DX 

O0E6 88061100 MOV INP0RTLOW,AL 

THERH0C0UPLES3UTPUT = SHL (INJPORTSHIGH, 8) OR INSPDRTSLOh; 

; STATEMENT # 35 
OOEA 8BQ60600 MOV AX, INPORTHIGH 
OQEE R108 MOV CL'SH 

OOFO Q3E0 5HL AX,CL 

00F2 8A0E11O0 MOV CL/INPORTLnw 

QQF6 BSOO MOV CH,OH 

OOFS 0BC1 OR AX,CX 

OQFA 89060800 NOV THERMDCOUPLE0UTPUT,AX 

TEMPERATURE = INTERPOLATE CTHERMOCOUPLESOUTPUT) ; 

; STATEMENT # 36 
OOFE 50 ^USH AX ; 1 

OOFF E857FF CALL INTERPOLATE 

0102 89060 AOO MOV TEMPERATURE, AX 



RETURN TEMPERATURE; 



; STATEMENT U 37 



0106 SS060A00 MDV AX, TEMPERATURE 
01QA 50 PCP 3P 

0108 C20400 RET 4H 

END TEMPSDATAJFROMSPORTS; 

; STATEMENT * 38 
TEMPDATAFRQMPORTS END? 



end plmoata; 



STATEMENT H 39 



MODULE INFORMATION: 



CODE AREA SIZE 


= 


010EH 


2700 


CONSTANT AREA SIZE 


= 


0020H 


320 


VARIABLE AREA SIZE 


= 


0012H 


130 


MAXIMUM STACK SIZE 


= 


0010H 


163 


95 LINES READ 








PROGRAM SRRORCS) 









END OF PL/M-86 COMPILATION 

Figure 5-3. Listing of PLMDATA with the CODE Control (Cont'd.) 
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CHAPTER 6 

USING UTILITIES TO PREPARE 

EXECUTABLE PROGRAMS 



"Three things are to be looked to in a building: that it stand on the right spot; that it be securely 
founded; that it be successfully executed." 

— Johann Wolfgang Von Goethe 



You must do three things to prepare and execute programs successfully: link program 
modules to resolve external references, locate the linked modules by binding them to memory 
addresses, and run the program in the appropriate operating environment. 

These things are easy to do for most high-ievel ianguage programs. Easy-to-use utility pro- 
grams perform these operations for you. They are also flexible enough to allow you to perform 
more complicated linking and locating operations for programs that refer to physical memory 
addresses. The compilers for high-level languages usually produce programs that do not refer 
to physical memory addresses; these programs can be linked and located in one easy step. 

The diagram in figure 6-1 shows the process of linking and locating (binding to addresses) 
modules to prepare a program that can be RUN on the Series III system (or debugged via 
DEBUG-86, described in Chapter 7). 



MODULES CONTAINED 

IN RUN-TIME 

AND 

nern'C i ion Anirc 




OBJECT MODULES 
FROM COMPILERS 
OR ASSEMBLERS 




' 




' 


' 




• 


' 






' 


' 




' 


' 






LINK86 
(DEFAULT) 




LINK86BIND 
(WITH BIND 
CONTROL) 






1 












L0C86 








\ 


■ 












< 



DEBUG-86 RUN 

Figure 6-1 . Using Utilities to Prepare Executable Programs 
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PREPARING A LIBRARY OF PROGRAM MODULES 



A library is any collection of public modules— modules that contain public procedures that can 
be used by programs. Some libraries are supplied by Intel; for example, the run-time system 
used with Pascal-86 programs is supplied as several library files. Pascal-86 has a number of 
built-in procedures that you can use in any Pascal-86 program— these procedures can be 
found in the supplied run-time libraries. To use any of the built-in procedures, you must link 
the run-time libraries to your program modules using the LINK86 utility. 

You can also build your own library files using the LIB86 utility. With the LIB86 utility you can 
create a library, add modules from another library, add new modules, delete modules in a 
library, and list the names of modules in a library. 

The following example shows a session with LIB86. We create a new library called TONY. LIB, 
and then we ADD to it some of the modules from a supplied run-time library called P86RN2.LIB. 
We then LIST the modules in TONY. LIB, and EXIT from the LIB86 utility: 

-RUN LIB86<cr> 

SERIES-III 8086 LIBRARIAN V1.0 

♦CREATE : F1 :T0NY. LIB<cr> 

♦ADD : F1 : P86RN2 . LIB(M0D1 , M0D4, M0D7) TO : F1 : TON Y . L I B<c r> 

♦LIST :M :TONY.LIB<cr> 

TONY. LIB 

H0D1 

H0D4 

H007 
*EXIT<cr> 



The linker (LINK86) treats library files in a special way. As shown in the next section, you 
specify your program modules first in the LINK86 command line, then you specify the 
appropriate libraries. You must be sure to link these modules in the proper sequence. 

Why? Remember that your program's main module refers to procedures that exist only in 
other modules— external procedures. The linker must be able to find the external procedures. 
LINK86 remembers the references to external procedures in the first module, and looks in the 
subsequent modules for those external procedures. If it cannot find the external procedures in 
subsequent modules (maybe because you erroneously specified the library before specifying 
the program modules in the LINK86 command line), LINK86 will generate an error message. 

The built-in procedures supplied with Pascal-86 (READLN, WRITELN, etc.) are external pro- 
cedures contained in the modules included with the run-time support libraries. LINK86 will first 
see the reference to these procedures in your program modules, and then it will look in the 
libraries for the modules that will satisfy those references. LINK86 will only link in those 
modules that are needed to satisfy external references; it will not link in the entire library of 
modules unless your program modules refer to all of the library modules. 

Since you do not need to use LIB86 to handle run-time libraries supplied with Pascal-86, you 
only need LIB86 to handle your own libraries. Why would you set up your own libraries? To 
manage sets of repetitive modules. In many software development labs, modules useful to 
many different programs would either be lost or repeated. Libraries are sets of modules that 
are easily maintained through use of the LIB86 librarian. The LINK86 utility is capable of 
searching such a library and only checking out the modules needed for the linked program. 
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LINKING MODULES TO FORM A LOCATABLE PROGRAM 



Most modular programs have a main module that calls procedures in other subordinate 
modules. Although a subordinate module can call a procedure in the main module, most calls 
are from the main module to a subordinate module, and the modular structure resembles an 
upside-down tree, as shown in figure 6-2. We included the run-time system modules in this 
tree, since the program modules rely on the built-in procedures and operating environment 
calls found in the run-time system. 

When you link these modules together using the LINK86 utility, you allow LINK86 to see the 
main module first, because the main module is the most abstract; that is, it has the highest 

level Ul duanct^liUM, emu u v^anS piu^cuui com iuwci icvcio lupciiynn cbvii ctvu viijr . i \j\j onuuiu 

then allow LINK86 to see the next subordinate level of modules, and so on. 



The last group of modules for LINK86 should be any run-time system libraries that are needed 
to perform the built-in procedures (READLN, WRITELN, etc.). The run-time system libraries 
contain modules that are at the lowest level of abstraction— these are the modules that call 
procedures in the operating environment of your system (the operating environment is usually 
invisible to you, but not to your Pascal program). 

For an example, we will link together the modules needed to test our main program in the 
Series III environment. We start with our main module MAIN. OBJ, which holds the MainControl 
module. We link to it the test versions of the modules GetData found in DUMDAT.OBJ, and 
Operation found in DUMOP.OBJ. Finally, we link in the modules we need from the run-time 
system libraries P86RN0.LIB, P86RN1.LIB, P86RN2.LIB, P86RN3.LIB, 87NULL.LIB, and 
LARGE. LIB (we explain these libraries after the example): 



-RUN LINK86 
> > : :■ 1 
>>: F1 

>>T0 



F1 : MA IN .OBJ , : F1 :DUMDAT.OBJ , :F1 :DUM0P.0BJ ,S<cr> 
"86RNC . LIB, : F1 :F8£RN1 .L:b, : F1 :P3£RM2 . LIB,S<cr> 
P86RN 3.LIB,:F1:87NULL.LIB,:F1:LARGE.LI8&<cr> 
F1 :PR0GRM.86 BIND<cr> 



Let's explain this example. We used the RUN command to run the LINK86.86 utility in the "8086 
side" of the Series II!. We specified the three object modules of our program, and then we 
specified all of the run-time libraries needed to run our program in the Series III environment. 





MAINCONTROL 






' 


' 




' 


I 




GETDATA 




OPERATION 




' 






• 


RUN-TIME SYSTEM MODULES 



Figure 6-2. Main Module with Subordinate Modules 



121632-7 
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We directed the output to a file called PROGRM.86. Finally, we specified the BIND control in 
order to make PROGRM.86 an LTL (load-time locatable) program. The BIND control is the 
easiest way to make a program locatable in the Series III environment (more on BIND in the 
next section). PROGRM.86 can now be loaded and executed (via the RUN command) in the 
Series III system. 

The run-time system libraries P86RN0.LIB and P86RN1.LIB are required for any Pascal-86 pro- 
gram that needs run-time support. The libraries P86RN2.LIB and P86RN3.LIB are required for 
any Pascal-86 program that uses the file input/output procedures and other operations per- 
formed by the operating system. The 87NULL.LIB is needed for programs that do not use 
either the 8087 processor or emulator to perform real arithmetic. Since our program has no 
REAL data types, it does not perform real arithmetic; therefore, it needs the 87NULL.LIB 
library (if it did perform real arithmetic, it would need other libraries). Finally, to run any 
Pascal-86 program on the Series III system, you need to link the LARGE. LIB library to the pro- 
gram. The LARGE. LIB library contains the primitives (service routines) used to perform opera- 
tions in the Series III environment. 

The run-time system is separated into several libraries so that you can customize your run- 
time environment if you so wish. The libraries described above are the default libraries used to 
run programs on the Series III system, if your programs do not use REAL data types. If your 
programs use REAL data types, you would not use 87NULL.LIB; instead, you would use the 
8087 processor with the library 8087.LIB, or the 8087 software emulator with the libraries E8087 
and E8087.LIB. Consult the Pascal-86 User's Guide for specific information about the run-time 
system libraries. 



LOCATING AND RUNNING PROGRAMS 

A program must reside in actual memory before it can run.The/ocar/'ngr process assigns actual 
(physical) memory addresses to a program. There are two ways to accomplish the locating 
process: 

1. Using LINK86 with the BIND control to produce an LTL module (discussed in the next 
paragraph), which can be located, loaded, and executed automatically by the RUN 
command 

2. Using LINK86 (without the BIND control) to produce a linked module, then LOC86 to locate 
the module in an area of memory you specify, and finally RUN to load and execute the 
program 

The simplest locating operation involves using the LINK86 utility with the BIND control, as 
shown in the previous example. This simpler process, called binding, binds modules to logical 
segments, which can be located in actual memory by the RUN command in one fast step. 
Modules produced by the LINK86 utility with the BIND control are called load-time locatable 
modules (LTL modules). An LTL module is a module that can be located almost anywhere in 
memory, and so the RUN loader can easily locate it in the Series III environment for you. The 
DEBUG-86 debugger can also locate an LTL module for you, as we will show in the next 
chapter. 

For example, our LINK86 example in the previous section bound the modules properly to form 
the program PROGRM.86. Now, in one step, you can locate this bound program in actual 
memory, load it into memory, and execute it in the "8086 side" (8086 execution mode) of the 
Series III system by using the RUN command: 

-RUN : F1 : PR0GRM<cr> 
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Note that we did not type PROGRM.86, only PROGRM. The RUN ioader iooks for the ".86" 
extension automatically, unless you specify another extension or a period at the end of the 
name (the period signifies no extension). 

High-level language programmers usually do not burden themselves with more details about 
locating programs. However, assembly language programs and some PL/M programs fre- 
quently refer to physical addresses rather than symbolic (logical) addresses. These program 
modules are called absolute modules because they use absolute physical addresses. 
Absolute modules cannot be located automatically by the RUN command— they must be 
relocated first by the LOC86 utility. 

There is a case when even the simplest program must be located by LOC86: if you intend to 
debug your program using an ICE-86 or ICE-88 emulator, you must locate the program with 
LOC86 to make it an absolute module. The ICE (In-Circuit Emulation) loaders can only load 
absolute modules. 

For an example, we will link our new PL/M-86 module PLMDAT.OBJ to our program, along with 
another version of our GetData module in DATA. OBJ, and produce the linked module 
MAIN.LNK: 

-RUN LINK86 : F 1 : M A I N . OB J , : F 1 : D AT A . B J , : F 1 : P LHD AT . OB J , &<c r> 

>>:F1: DUMOP.0BJ,:F1:P86RN0.LIB,:F1:P86RN1.LIB,:F1:P86RN2.LIB,S< cr> 

>>:F1:P86RN3.LIB,:F1:87NULL.LIB,:F1:LARGE.LIB<cr> 

Since we did not specify a new filename with a "TO" clause, the LINK86 utility directed the 
linked output to the file :F1:MAIN.LNK (LINK86 takes the name of the first object module 
MAIN. OBJ, and changes its extension to LNK to make MAIN.LNK). Now we are ready to locate 
:F1:MAIN.LNK with the LOC86 utility: 

-RUN L0C86 :F1:MAIN.LNK TO : F 1 : PROGRM . 86 RESERVEC200H TO 77FFH)<cr>. 

We used the RESERVE control with LOC86 to reserve an area of memory for the Series III 
operating system. LOC86 will not locate any program segments in the area between addresses 
200H and 77FFH ("H" is for hexadecimal). You must leave room for the Series ill operating 
system to execute programs in the Series III environment. 

The LINK86, LOC86, and LIB86 utilities are described in detail in the iAPX 86,88 
Family Utilities User's Guide for 8086-Based Development Systems. This manual 
describes all of the utilities for iAPX 86 or iAPX 88 applications development. 
These utilities are designed to be used in 8086-based development systems like 
the Series III. 

We can now RUN our program on the Series III system: 

-RUN PR0GRM<cr> 

Climate system is now on. 

Type the thermostat setting in degrees Celsius:24<cr> 

Type the inside temperature reading in Celsius:21<cr> 

Type the temperature of the collector water in Celsius:50<cr> 

Type the temperature of the tank water in Ce I s i us : 60<c r> 
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Type the temperature of the heated tank water in Ce Is i us : 70<c r> 

Type the hour of day, as in 04 or 24:13<cr> 

Type the minute of the hour, as in 01 or 59:25<cr> 

Type the amount of sunlight, any integer will do for now:1<cr> 



CURRENT OATA IS AS FOLLOWS: 

Thermostat Setting is 24C 
Inside temperature is 21 C 
Temperature of collector water is 60C 
Temperature of tank water is 60C 
Temperature of the heated tank water is 70C 
Time of day is 13:25 
Amount of sunlight is 1 



The Climate System is now operating. 

The time is 1 3 : 25 

The inside temperature is 21C 

The thermostat setting is 24C 

Method chosen to heat the building: Solar Collector to Exchanger 



No panic occurred, ABNORMAL shutdown. 

Last chosen heating method was: Solar Collector to Exchanger 

Thermostat Setting is 24C 

Inside temperature is 21 C 

Temperature of collector water is 60C 

Temperature of tank water is 60C 

Temperature of the heated tank water is 70C 

Time of day is 13:25 

Amount of sunlight is 1 



Goodni ght , I rene . . . 



What happened!? Our program stopped with an abnormal shutdown! It had no trouble picking 
the right heating method; however, something caused the variable Operating to become 
FALSE, without setting Panic to TRUE. We will have to debug the program in the next 
chapter... 
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DEBUGGING AND EXECUTING PROGRAMS 



"Appearances are often deceiving." —Aesop 



We have written program modules and they compiled correctly. We used the LINK86 utility with 
BIND to link the modules into a program and prepare it tor execution. By all appearances, it 
looks like it will work as planned. 

However, when we loaded and executed (via the RUN command) the program, something 
mysterious happened— the "hidden glitch" struck! 

We now have to debug our program— find all of the "hidden glitches" and fix them. Debugging 
is so essential to programming that in most software development efforts, more time is alotted 

tr\ rtohunninn than tn anu nthAr artivitv 



Debuggers are programs that monitor a program's execution and allow you to stop execution 
and check details. Usually a debugger is part of an execution vehicle— a piece of hardware 
your program executes on, or a piece of software your program executes in. The debugger 
monitors the activity in the execution environment. 

For example, the Series III provides two execution environments or execution vehicles: the 
8085 execution mode and the 8086 execution mode. To debug programs that run in the 8085 
execution mode, you type the DEBUG command on the "8085 side" (8085 execution mode) to 
start the Monitor. To debug programs that run in the 8086 execution mode, you RUN the 
DEBUG command on the "8086 side" (8086 execution mode) to start the DEBUG-86 debugger. 
Both debuggers reside in ROM. 

With a debugger you can load and execute a program (rather than using RUN), and stop the 
execution to check the values of variables, the contents of registers, and other details. You 
can also change such values, and perform other activities that monitor a program's execution. 
You can even execute your program one step at a time. 

Since the Monitor (for 8085 execution mode) is described in several Intel documents 
(McCracken's Guide to Intellec Microcomputer Development Systems and the Intellec Series 
III Microcomputer Development System Console Operating Instructions), we will devote this 
chapter to describing DEBUG-86 and the ICE-88 emulator (a version of the ICE-86 emulator) for 
debugging programs in the 8086 execution mode for iAPX 86, 88 applications. 
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USING DEBUG-86 FOR SYMBOLIC DEBUGGING 

Debuggers are useful because they load and execute a program for you, and they allow you to 
stop execution at any point you specify. If you are an assembly language programmer, your 
program directly uses registers and memory locations; you would want to check the contents 
of these registers and memory locations. If you are a high-level language programmer (PL/M, 
Pascal, FORTRAN, etc.), you do not directly refer to registers and memory locations; you 
would rather check the values of your variables, or symbols. 

For example, we know we have a problem with our program: the variable Operating should 
always have the boolean value of TRUE as long as Panic is FALSE. If Panic is set to TRUE, 
Operating should then become FALSE; however, Operating is somehow set to FALSE while 
Panic remains FALSE. During the execution of our program, we should be able to stop execu- 
tion and check the value of Operating. 

One way to do this is to find the address of Operating and check its contents. A better way 
would be to simply ask for the value of Operating in a command such as: 

♦BOOLEAN BYTE . . MA I N CONTRO L . OPERAT I NG<c r> 
FALSE 

In DEBUG-86, you can execute our program and stop its execution anywhere. You can then 
use the above command to find the boolean (true or false) value of Operating without knowing 
where Operating is located. 

In our program there is only one symbol named Operating. If there were more than one, we 
would specify the symbol by specifying both the module name and the symbol name (e.g., 
..MAINCONTROL. OPERATING), as we did in the above example. We would have obtained the 
same result by specifying only ".OPERATING". You use two periods as a prefix to module 
names, and one period as a prefix to symbol names. 

To do symbolic debugging using the symbols in your program, you must compile your program 
using the DEBUG compiler control (see Chapter 4 for the Pascal-86 compiler, and Chapter 5 for 
the PL/M-86 compiler). The DEBUG compiler control produces a symbol table for your pro- 
gram, which can be loaded by DEBUG-86. If you do not use the DEBUG compiler control while 
compiling, you can still do symbolic debugging by defining all of your symbols from within 
DEBUG-86. 

To invoke DEBUG-86, use the following command: 

-RUN DEBUG<cr> 
DEBUG 8086, V1 .0 
* 

DEBUG-86 is now in control, as shown by the asterisk (*) prompt. You can now type DEBUG-86 
commands. To load PROGRM.86 and its symbol table, type the following command: 

*L0AD : F1 : PROGRM . 86<c r> 

You can check the symbol table by typing the SYMBOLS command: 

*SYMB0LS<cr> 
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The symbol tabie contains each moduie name and symbol name, with their addresses. You 
can find the address of a single symbol by typing the name of the symbol. For example, we 
want to know the address of the call (in module MainControl) to the procedure OperateSystem 
(which is in the module Operation): 

*.. MAINCONTROL. OPERATESYSTEM<cr> 

.. MAINCONTROL. OPER AT ESYSTEM=0481:06CCH 

DEBUG-86 knows where to start executing the program by looking at the contents of the CS 
and IP (CS:IP) registers. The CS register holds the starting address of the program's code seg- 
ment, and the IP register holds the address within the code segment where the program 

SK/miM >-s4"-.»-+ *av»Q^i t+i/M-i PC finH ID ^honno oo tha r»rr\nrpm avooiitoc thorafnro tn nrOCQn/O tho 
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starting location of the program, we create a new symbol called .START to hold the starting 
address: 

♦DEFINE .START=CS: IP<cr> 

We could also check the contents of CS:IP: 

*CS<cr> 
CS=0481H 
*IP<cr> 
IP=0FD6H 

You should familiarize yourself with addresses. The 8086 and 8088 processors use 20-bit 
physical addresses separated into two words: the segment base address and the offset value. 
The CS register holds the code segment base address, and the IP register holds the offset 
value. All addresses are in hexadecimal notation (the "H" stands for hexadecimal). All 
addresses are displayed with the segment base, followed by a colon, followed by the Onset. 

The EVALUATE (abbreviated "EVA") command is useful for evaluating numeric and character 
values and addresses. For example, the number 4142H can be represented in several ways: 

*EVA 4142<cr> 

1 000001 01 0000Y 40502Q 16706T 4142H 'AB' 

When you type a number by itself, DEBUG-86 assumes the number is in hexadecimal notation. 
The number 4142H is equivalent to the decimal number 16706 ("T" denotes decimal notation), 
the octal number 40502Q ("Q" denotes octal notation), the binary number 1000001 01 0000Y ("Y" 
denotes binary notation), and the ASCII characters "AB" (41H is the ASCII code for "A" and 
42H is the ASCII code for "B"). 

The EVA command will also find the closest symbol that has the address you specify. The 
keyword SYM tells the EVA command to evaluate the address symbolically: 

*EVA 481 :6CC SYM<cr> 
..MAINCONTROL. OPERATESYSTEM 

We will now execute our program and stop its execution before it executes the OperateSystem 
procedure. The GO command will start executing at the beginning of the program, which it 
knows by looking at the CS and IP registers (CS:IP). You could specify an actual address with 
GO to start from, or the line number of a program statement, or a statement label; however, we 
do not use statement labels in our program. We want our program to stop while it is executing 
the main (WHILE Operating) loop, not at the start of the OperateSystem procedi e in the 
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Operation module (since procedure definitions do not actually execute). Our program will GO 
until it reaches the starting address, in the MainControl module, of the call to the 
OperateSystem procedure: 

*G0 TILL . . MAINCONTROL. OPERATESYSTEM<cr> 
Climate System is now on. 



During execution, we type in the 
temperatures and other data. The program 
stops and DEBUG-86 displays the next 
instruction to be executed (in assembly 
language form). 



0481:06CCH PUSH BP 



At this point, we can check the boolean values of both Panic and Operating: 

**B00L BYTE .PANIC<cr> 

FALSE 

*BOOL BYTE . OPER AT ING<c r> 

FALSE 

To make sure the program stopped at the right place, we evaluate the CS and IP registers 
symbolically: 

*EVA CS:IP SYM<cr> 
..MAINCONTROL. OPERATESYSTEM 

Another useful DEBUG-86 command is the STEP command. From any point of program execu- 
tion, you can execute the program step by step— one machine instruction at a time. The STEP 
command also displays the next machine instruction to be executed. This display is in 
"disassembled" form— the machine instruction is translated back into assembly language: 

*STEP<cr> 

0481:06CDH MOV BP.SP 

* 

STEP executes one machine instruction and displays 
the next one di sassemb led . Another STEP would 
execute the di splayed instruction. 

We will now change the value of Operating to be TRUE. A boolean variable is TRUE if its 
numeric value is odd; FALSE if its numeric value is even. Why? Because a boolean is TRUE if 
its rightmost bit (in a binary representation) is 1, and FALSE if its rightmost bit is 0. All even 
values written in binary form end with a in the rightmost bit, and all odd values written in 
binary form end with a 1 . 

To change the value of Operating, we must also specify BYTE, since it is only one byte long: 

♦BYTE .0PERATING = Kcr> 
*B00L BYTE . OPERAT I NG<c r> 

TRUE 
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We can now continue execution with a GO command: 
*G0<c r> 
The Climate System is now operating. 



Execution continues correctly, and the 
program Loops back to the GetData 
procedure to obtain more data. As we 
continue execution, the program once 
again erroneous ly changes Operating 
to FALSE. 

We can use our .START symbol to start execution once again at the beginning of the program: 

*G0 FROM .START TILL .. MA I NCONTRO L . OPERATES YSTEM<c r> 

After repeating these debugging operations, we are sure that our error occurred at the state- 
ment where Operating is set to FALSE while Panic is set to TRUE. 

Refer to the listing in Chapter 4. The Pascai-86 statement numbers are in the "STMT" column 
of the listing. The "LINE" column shows the source fiie iine numbers (you can use the line 
numbers with CREDIT to display, edit, move, or copy particular lines). 

Between statements 37 and 40 (source lines 68 and 70), we have an ELSE clause that should 
only execute if the temperatures are not greater than the minimums necessary to heat the 
bui!din n . Panic should be set to TRUE and Operating should be set to FALSE, if this ELSE 
clause executes. 

However, the "ELSE Panic:=TRUE" is not executing, but the "Operating:=FALSE" is always 
executing! The error is one of omission: to have two statements execute as part of an ELSE 
clause, they must begin with 8EGIN and end with END, as shown: 

ELSE BEGIN 

Panic:=TRUE; Op%aa t i ng : =F ALSE ; 
END; 

To make this change, we must re-edit MAIN. SRC, re-compile MAIN. SRC to obtain 
a new MAIN. OBJ, and re-link the modules using LINK86 (with BIND, as shown in 
Chapter 6). Figure 7-1 shows the revised listing, with the corrected ELSE clause 
shaded, and a sample run of the program. 



SESISS-III 'aseal-36, XD31 



°AGE 1 
M&INCONTSOL 



Source File: : F1 :MAIN. S3C 
Object File: : c 1 :MAIN.DSJ 
Controls Specified: Dc3UG. 

STMT LINE NESTING SOURCE TEXT: :M:HAIN.SSC 

1 10 MODULE NainCort-ol; 

2 2 

( * Interface specification common to all modules *) 

$1NCLUDE(:M:INSPEC.SRC> 
= 1 PL13LIC MainConfal; ('section of interface specification*) 



Figure 7-1 . Climate Control Program Listing and Sample Run 
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CONST (♦declarations declared publicly in this module*) 

Hinimum c orExchanger = 35/(*degrees Celsius*) 

MinimumPorMeat ump = 13* 



TYPE (*def initions publicly defined in this 



odule* ) 



AirTemperature =-20. . 1 20; (*degrees in Celsius*) 

Water-Temperature = 0..120/" 
HeatingMethods =CCollect , orToExchangery 

CollectorToHeatPump/ 

Tank To Ex c hanger t 

TankToHeatPump/ 

HeatedTankToHeatPump/ 

NoMethod); 



SystemData 



= RECORD 

ChosenMethod 
InsidaTemp/ 
Thermostat Setting 
CollectorHaterTemp/ 
TenkVlaterTemp/ 
HeatedTankTeup 
AmountOfSunlight 
Hour 
Minute 
END (*Syst©Br0ata*>; 



: Heating Methods; 
: BirTemperatur«; 



: WaterTemperature; 

: Integer/ 

: 00. .24; 

: 00. .59; 



VAR (*variables publicly defined in this module.*) 



CurrentData 
Operating/' Panic 



: SystemOata; 

: boolean; 



PUBLIC SetOata; (*GetData Module containing GetData % StoreData*) 

PROCEDURE GetDataCVAR Current0ata:Systft"0ata) ; 
PR0CE0URE StoreDatatVAR CurrentData: SysteaDa t a) i 

PUBLIC Operation; ("Operation Module containing OperateSysta*/ 
StartUpSystem and SnutDotitnSystem*) 
PROCEDURE StartUpSystem; 

PROCEDURE OparateSystenCVAR CurrentData: SystemOata); 
PROCEDURE ShutOonnSystemCVAR CurrentData: SysteaDsta); 

PROGRAM MainC ontroKINPuT/OUTPUT); 
(* end of inter'scs specification *) 
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PROCEDURE DetermineMethpdCVAR CurrentData : SystemOata); 
3EGIM 

t-IITH CurrentData DO 
5EGIN 

IF InsideTemp<Tnermos tat Set ting THEN 
BEGIN 

IF Collect orWaterTemp>Minintu* c or Exchanger THEN 

ChosenMethod :=CollectcrToExchangsr 
ELSE IF CollectorWaterTemp>MininuFiiForHeatPuinp THEN 

CnosenMethod:=CollectorToHeatPump 
ELSE IF TankWaterTemp>MininiumForExchanger THEN 

Chosen Met ho d:=TankToExc nan gar 
ELSE I" 1 TankHaterTemo>Hinimu'BForHestPufflp THEN 

ChosenMethad:=TankToHeatPump 
ELSE IF HeateriTankTenp>MinimumForHeatPump THEN 
ChosenMethod: =HeatedTankToHeatPu™p 

■>,,,;, ,:fcW,". :!: 
~UD 
ELS= (*no heating request*) ChosenMethod:=NoMethod 
f ND ; (*WitH [jrrentD?t3») 
rNO; (*DetermineMethod) 



C* 



MAIN PROGRAM ** 



*) 



3!GIN 

StartUDSystsm; 
3perating:=TRj=; 
Panic:=FALS=; 

rfHlLE Operating 00 (*uihile system is operating, do:*) 
5E3IN 

GetCetatCurrentGata); (*5et the temps / time/ etc.*) 
StorsDatat CurrentData); (* Store this data as record*) 
Deter=iiineMethod(CyrrentOata); (*this detects a panic*) 
Opsr? taSy stem ( CurrentData) ; 
:NQ; {*u(hil» operating*) 
ihutCownSy stem (CurrentData) ; 
=n:. I*Main Control Algorithm*) 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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Summary Information: 



PROCEDURE 
DETERMINEMETHQO 



3=FSET CCDc SIZE O^TA SIZE STACK SIZE 
5011 ri Oj3 = h 143G D006H 6D 

QH7H 3273 3C16H 220 004CH 76D 



96 Lines Read. 
3 Errors Detected. 
33% Utilization of M 9 mo 



SERXES-IXX Pascal-S6/ X031 



Source File: : F1 : DUMDAT. SRC 
Object File: : F1 : DUMDAT. DB J 
Controls Specified: 2£3UG. 



STMT LINE NESTING 



SOURCE TEXT; :"=1 :DUMDAT .SRC 

(*This is a dummy GetData module/ with dummy GetData 
and StoreData procedures/ for use with MainControl 
module in tasting phases. It only performs console 
input to get Celsius temperatures/ the time of day/ 
and the amount of sunlight (insolation) for the 
solar collector. Use PLM86SDATA module for real 
application.*) 



MODULE GetData; 
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= 
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$INCLU0t:<:(-'i:I^SP = C.SRC) 

PUBLIC MainControl; (*seetion of interface specification*) 

CONST <*declarations declared publicly in this module*) 



Mini*umForE)schanger 
MinimumFcrHeatPump 



35;(*degrees Celsius*) 



TYPE <*def initions publicly defined in this modula*) 



AirTemperature 

UaterTemperaturt 

HeatingMethods 



=-20. .1 20; (*degreas in Celsius*) 

=o..i2o; 

=(CollectorToExc hanger/ 

CollectorToHeatPump/ 

TankToExc hanger/ 

TankToHeatPump/ 

He a ted Tank To Heat Pump/ 

NoMethod); 



RECORD 

ChosenMethod 

InsideTemp/ 

ThermostatSetting 

TankUaterTemp/ 

HeatedTankTemp 
fl<!iountCf Sunlight 
Hour 
Minute 
END (-SysteaOata*); 



: HeatingMethods/ 
: AirTemperature/ 



WaterTemperature* 

Integer; 

00.. 24; 
00. .59; 



VAR C*yariaoles publicly defined in this module.*) 



CurrsntData 
Operating/ Panic 



: SystemOata; 

: boolean; 



PUBLIC GetData; C*GetOata Module containing GetOata & StoreData*) 

PROCEDURE GetData(VAR CurrentData:SystemData); 

PROCEDURE StoreOataCVAR CurrentData:SystemData>; 

PUBLIC Operation; ('Operation Module containing Opera teSystem/ 
StartUpSystem and ShutDoumSystem* ) 
PROCEDURE StartUpSystem; 

PROCEDURE DperateSystemCVAR CurrentOata: Sys temData) ; ^ 
PROCEDURE ShutDomnSystem(VAR CurrentData: SystemDs ta) ; 



PRIVATE GetDsta; 

(* end of interface specification 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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SetDataCVAR CurrentDstaiSystemData); 



?WQZ=U 
BEGIN 

WITH CurrentData DD BEGIN 

WRITEC'Type the thermostat setting in degrees Celsius:*); 

READLN(ThermostatSetting); WRITELN; 

WRITECType the inside temperature reading in Celsius:'); 

READLNCInsideTemp); WRITELN; 

WRITECType the temperature of the collector water in Celsius:'); 

REA3LN(C3llectorWaterTeiip); WSITELN,' 

WRITECTyoe the temperature of the tank water in Celsius:*); 

RE ADLN (Tank Water Temp); WRITELN; 

WRITECType the temperature of the heated tank water in Celsius:'); 

READLN<HeatedTankTerap); WRITELN; 

WRITECType the hour of day, as in 04 or 24;*); 

READLN(Ho-jr); WRITELN; 

WRITECType the minute of the hour, as in 01 or 59: *); 

R=ADLN (Minute); WRIT El N; 

WRITECType the amount of sunlight/ any integer mill do for now:'); 

R=A3LN(flmount0fSunlight); WRITtLN; 
END; (*with CurrentDataO 

end; 

PROCEDURE Store3ata(VSR Curr entOata : Sy StemD ata ) ; 
5EGIN 

(•Dummy procedure, eventually mill store CurrentData in a file*) 
WITH CurrentOata DO BEGIN 

WRITELN C *); 

WRITELNCCJRRENT DATA IS AS FQLL0W5:*); 

WRITELN C '); 

WRITELN ('Tnermostat Setting is */ThermostatSetting,'C*); 

ni?IT = LN( 'Inside temperature is */InsideTemp,*C*); 

WRITELN ('Temperature of collector mater is '/CollectorWaterTemp/'C'); 

WSITElNC 'TeTiisrsturs of tank Jiater is ', T ank Water Temp, * C ') ; 

WRITELNCTsmaerature of the heated tank water is '/ HeatedTaikTeiup , * C * ) ; 

WRITELNCTime of ciay is ' / H u r , * : * , Minute); 

WRITELNC Amount of sunlight is '/AmountafSunliaht); 

WRITELN; <*a blank line*) 
EMD; £*aiith CurrentOataO 

en: 



Summary Info 



PROCEDURE 
ST0REDATA 
GETDATA 



0PPSET 


CODE 


SIZE 


DATA SIZE 


STACK 


SIZE 


04D5H 


0222H 


5460 




0010H 


160 


0294H 


0241H 


5770 




001 OH 


160 



104 Lines Read. 

1 Error Detected. 
33J Utilization of Memory, 



SERIES-III P«scal-86, X031 



:6F7H 1783C 3003H 



Source File: :F1 ; DUHOP. SRC 
Qbj«ct File: :F1 -dumop.obj 
Controls Specified: DEBUG. 



STMT LINE NESTING 



S3URCE TEXT: : F1 : OUHDP . SRC 

(*This is a dummy Operation module/ uiith dummy Startup System 

ShutDo tun System/ and OperatsSystem procedures, 

for use with MainControl module in testing phases. 



MODULE Operation; 

t* Interface specification 



tc all modules *) 



$INCLUDE(:F1:INSPEC.SRC) 

PU3LIC MainControi; C*section of interface specification*) 

CON ST (*declarations declared publicly in this module*) 



^inimumForHeatPump = 
TYPE (*definiti3is publicl 



35;t*degrees Celsius*) 

13; 



defined in this module*) 



A i r T e -n p e r a t u 



WeterTemperature = . - 1 ? ; 



. 1 20; (*dsgrees 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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Heati.igMethods =(CollactorToSxchanger/ 
CollectorToHeatPump/ 
TankToExchanger/ 
TankToHestPuinpr 
HeatedTankToHeatPump/ 
NoMethod) ; 



SystemData 



RECORD 

ChosenMethod 

InsideTemp* 

ThermostatSetting 

CollectorWaterTemp/ 

Tgnk Water Temp* 

HeatedTankTemp 

AmountOfSunlight 

Hour 

Minute 

END (*5ystem0ata*); 



HeatingHethods/ 

AirTemperature; 



: WaterTemperature; 

: Integer; 

: 00, .24; 

: 00. .5°; 



VflR Ovariables publicly defined in this Module.*) 



CurrentData 
Operating^ Panic 



: SystemData; 

: boolean; 



PUBLIC GetOata,' <*GetData Module containing GetData & StoreData*) 

PROCEDURE GetDataCVAR CurrentOata: SystenOata) /" 
PROCEDURE StoreOata(VAR CurrentOata: SystemData) ; 

PUBLIC Operation; (*0peration Module containing OperateSy stem* 
StartUpSystam and Shut Down System*) 
PROCEDURE StartUpSystem; 

PROCEDURE DperatsSystBm'VAR Current Data: SystamData) ; 
PROCEDURE Shut0ojjnSystem(VA5 CurrentData:SystemOata); 
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£* end of interface specification *J 

PROCEDURE StartUpSystem; 
BEGIN 

wR ITELN ('Climate system is now on.*); 

writeln c ">'> 

writeln; 
end; 

PROCEDURE OperateSystemCVAR CurrentData :5ystemData); 
BEGIN 

WITH CurrentData DO SEGIN 

WRITELN [*=============================================='); 

WRITELNCThe Climate System is now operating.'); 

writeln; 

WRITELNCThe Time is '/ Hour, ' : './Minute) ; 

WRITELNCThe inside temperature is '/TnsidsTemp/ *C* ! / 
WRITELNCThe thermostat setting is '/ThermostatSet t ing/ "C * ) ! 
WRITECHethod chosen to heat the building: *); 
CASE ChosenMethod OF 

CollectorToExchanger; WRITECSolar Collector to Exchanger*); 

TankToExchanger : WRITECTank to Exchanger*); 

TankToHeatPump : WRITECTank to Heat Pump*); 

HeatedTankToHeatPump: WRITE*. 'Heated Tank to Heat Pump*); 

NoHethod : WRITEC'No heat required*); 

end; 
writeln; 

WRITELN < '=============================================='); 

WRITELN; (*write a blank line.*) 

end; 

EN0;(*0perateSystsm*) 

PROCEDURE ShutDoumSystemCVAR CurrentData: SystemData); 

BEGIN 

IP 'Panic THEN WRITELNCPANIC occurred/ NORMAL shutdown.') 

ELSE WRITELNCNo panic occurred* ABNORMAL shutdown. *) ; 

WITH CurrentOata DO BEGIN 

WRITEC'Last chosen heating method was: '); 
CASE ChosenMethod OF 

CollectorToExchanger : WRITECSolar Collector to Exchanger*); 

CollectorToHeatPump : WRITECSolar Collector to Heat Pu*p*); 

TankToExchanger : WRITECTank to Exchanger*); 

TankToHeatPump : WRITECTank to Heat Pump'); 

HeatedTankToHeafump: WRITE CHeated Tank to Heat Pump*); 

NoMethod : WRITEC'No heat required*)/* 



Figure 7-1. Climate Control Program Listing and Sample Run (Cont'd.) 
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69 65 1 3 ENO; 

71 66 1 2 writeln; 

72 67 1 2 WRITELNC'Thermostat Setting is *#Thermost atSetting* 'C > ; 

73 68 1 2 WRITcLN< 'Inside temperature is ' / InsideTemp, ' C' } ; 

7* 69 1 2 WRITELNC'Temperature of collector water is ' /Collec torMeterTemp, ' C ) ; 

75 70 1 2 WRITELN< 'Temperature of tank mater is "/TankWaterTemp, *C' >; 

76 71 1 2 WRITELN* 'Temperature of the heated tank mater is '/HeatedTankTemp, 'C ' ); 

77 72 1 2 URITELNC'Time of day is ' /Hour, ' : ' , Minute); 

78 73 1 2 WRITELNC 'Amount of sunlight is '/AmountOf Sunlight ) ; 

79 74 1 2 EN0;t*»ith Current jata*) 

81 75 1 1 JRITElnC:::: ::::::::::::::::::::::::::: ::::::::::::'); 

82 76 1 1 writeln; 

83 77 1 1 URITELNCGoodnight/ Irene...'); 

84 78 1 1 END 



**M*RN1NG, input: "END " 
**|8S repaired to "END ! " 
85 78 T C*ShutDoj,n<;y<stem*) 



Summary Information: 

PROCEDURE OFFSET CODE SIZE DATA SIZE STACK SIZE 

SHUTOOWNSTSTEM 0698H C399-I 9200 0010H 16D 

OPERATESYSTEM 044CH 0258H 6DDC 0010N 160 

STARTUPSTSTEM 03E2H 0D5EH 940 0010H 1 6D 

Total 0«3Cn 26380 C0O0H 00 0030H 480 

125 Lines Read. 

1 Error Detected. 
33% Utilization of Memory. 



-RUN PR06RM<cr> 

Climate system is now on. 

Type the thermostat setting in degrees Ce I s i us : 24 <c r> 

Type the inside temperature reading in Celsius:21<cr> 

Type the temperature of the collector water in Celsius:6C<cr> 

Type the temperature of the tank water in Celsius:60<cr> 

Type the temperature of the heated tank water in Ce I s i us : 70<c r > 

Type the hour of day, as in 04 or 24:13<cr> 

Type the minute of the hour, as in 01 or 59:25<cr> 

Type the amount of sunlight, any integer will do for now:1<cr> 



CURRENT DATA IS AS FOLLOWS: 

Thermostat Setting is 24C 
Inside temperature is 21 C 
Temperature of collector water is 60C 
Temperature of tank water is 60C 
Temperature of the heated tank water is 70C 
Time of day is 13:25 
Amount of sunlight is 1 



Figure 7-1 . Climate Control Program Listing and Sample Run (Cont'd.) 
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The Climate System is now operating. 

The t ime is 13:25 

The inside temperature is 21 C 

The thermostat setting is 24C 

Method chosen to heat the building: Solar Collector to Exchanger 



Type the thermostat setting in degrees Ce I si us : 24<c r> 

Type the inside temperature reading in Celsius:22<cr> 

Type the temperature of the collector water in Ce Isi us :1 0<c r> 

Type the temperature of the tank water in Ce Is i us :1 0<c r> 

Type the temperature of the heated tank water in Ce I s i us :1 0<c r> 

Type the hour of day, as in 04 or 24:13<cr> 

Type the minute of the hour, as in 01 or 59:30<cr> 

Type the amount of sunlight, any integer will do for now:0<cr> 



CURRENT DATA IS AS FOLLOWS: 

Thermostat Setting is 24C 
Inside temperature is 22C 
Temperature of collector water is IOC 
Temperature of tank water is 10C 
Temperature of the heated tank water is 10C 
Time of day is 13:30 
Amount of sunlight is 

The Climate System is now operating. 

The time is 13:30 

The inside temperature is 22C 

The thermostat setting is 24C 

Method chosen to heat the building: Solar Collector To Exchanger 



PANIC occurred, NORMAL shutdown. 

Last chosen heating method was: Solar Collector to Exchanger 

Thermostat Setting is 24C 

Inside temperature is 22 C 

T emp erature of collector water is 10C 

Temperature of tank water is 10C 

Temperature of the heated tank water is 10C 

Time of day is 13:30 

Amount of sunlight is 

Goodni ght , I rene . . . 

Figure 7-1 . Climate Control Program Listing and Sample Run (Cont'd.) 

Obviously this book only introduces DEBUG-86. For a complete description, see the Intellec 
Series 111 Microcomputer Development System Console Operating Instructions. 
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USING ICE-88™, AN IN-CIRCUIT EMULATOR 

The ICE-88 emulator consists of three circuit boards, a cable, a buffer box, and software on 
disk. The three circuit boards fit inside your Intellec Series III development system, and the 
cable and buffer box assembly connects your Series III system to your prototype hardware. A 
forty-pin plug at the end of the cable plugs into your prototype system in place of your pro- 
totype's CPU, allowing the in-circuit emulator hardware to emulate all functions of your pro- 
totype's CPU. If you do not have any prototype hardware, keep the plug's protector closed to 
prevent damage to its pins. 

In-circuit emulation shortens your development time in two ways. It provides symbolic debug- 
ging capabilities and diagnostic hardware debugging capabilities, and it lets you borrow 
resources (like memory) from your Series III system until your prototype system is complete. 

Your program can be loaded into borrowed memory, prototype memory, or any combination of 
the two, and run as if it were resident in the prototype. Yog can emulate program execution at 
real-time speed or in single- or multiple-instruction steps. You can also stop emulation 
manually at any time to examine system status, or you can specify breakpoints as you can with 
DEBUG-86. 

We will debug the PLMDATA module (first shown in Chapter 5) to see if it performs its port 
input and interpolations correctly. We added statements (shaded in figure 7-2) to the module 
that will execute the procedures. Figure 7-2 shows the listing of the compiled PLMDATA 
module. 

PL/M-e6 COMPILE* PLMDATa PA 

ISIS-II PL/M-86 H121 COMPILATION C MCDULE PLMDATA 

OBJECT MODULE PLACED IN PLKDE3.C3J 

COMPILER INVOKED ST: PLM86 PLM0E3.SRC DEBUC- 

1 PLMDATA: CD; 

2 1 DECLARE START LASEL PUBLIC; 

3 1 DECLARE (SETTING/ TEMPERATURE: WORD; 

/* 

INPUTS 



THERNOSTATSSETTINGS'R0MS»3RTS: 

Formal parameters HIGH and COW receive port numbers as actual parameters. 

Input ports HIGH and LOW: Thres BCD digits for the thermostat setting: 

°ort HIGH, bits 3-0: hundred's digit 
Port LOW/ bits 7-4: ten's digit 
Port LOW/ bits 3-0: unit's digit 

TEMP$OATAS=ROMSPCRTS: 

Formal parameters HIGH and LOW receive port rumbers as actual parameters. 

Input port HIGH: Binary ADC output of thermocouple/ high-order 8 bits 
Input port LOW: Binary ADC output of thermocouple/ loa-order 8 bits 



THESMDSTATSSETTING$=ROM$PORTS: Return WORD with setting in Celsius 
TEMPSOATASFROMSBQRTS: Return WORD Ulith temperature in Celsius 



Figure 7-2. Listing of the Modified PLMDATA Module 
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4 1 TMERM0STAT$S£TTING$PR0M$P3RTS: 

PROCEDURE (HIGH/ L3W) WORD; 

5 2 DECLARE (HIGH, LOW) WORD; 

6 2 DECLARE (INSPORTSHIGH/ INSPDRTSLCW) 6TTE; 

7 2 DECLARE ThSSMDSSETTInG WORD; 

& 2 DECLARE (HUNDREDS/ TENS/ UNITS) BYTE,' 

9 2 INJPORTSHl&H = INPUTCHIGH); 

10 2 INSPORTSLDW = IN»UT(L3W); 

11 2 HUNDREDS = INSPORTSHIGH AND OC0G1 1113; 

12 z tens = shrc:n$pcrtslcw, 4); 

15 2 units = inspdrtsldw and 030011113; 

14 ? therm3$setting = umts + 1q*t£n$ + 1 oq*hijndred$; 

15 2 return thermdssetting; 

16 2 end triermcstatssetting$p33hspdrts; 



/* Another typed procedure to return temperature data* which 
uses the INTERPOLATE typed procedure. */ 

/* INTERPOLATE is s typed procedure that receives thermocouple 
voltage and returns tamper a ture in Celsius using an 
interpolation routine »/ 

INTERPOLATE: 
PROCcDURE(VOLTSIN) WORD; 

DECLARE VOLTSt*) WORO 3ATA (0/ 51 / 102/1 54/ 206/258/365*472) ; 

DECLARE TSCEH-O WORD DATA (0/10/ 20/ 33/40/50/70/90) /* 
DECLARE (I, VOLTSIN/ NUMERATOR; WORD; 

I = o; 

DO WHILE VOLTSIN > VDLTS(I); 



/* Shift for rounding/ and return Celsius temperature */ 

25 2 NUMERATOR = SHL ( C VOLTSIN-VOLTS { 1-1 ) ) * (TSCEL t I ) ~T$C=L < 1-1 ) ) / 1)/ 

26 2 RETURN TSCELC-1) + SUB (NUMERATOR/ (VOLTS CI ) -VOLTSC 1-1 ) )*1 / 1); 
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29 
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30 
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34 
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35 
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36 
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37 
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38 


? 


39 


1 


40 


2 


41 


2 


42 


2 


43 


1 



end interpolate; 



TEMP$DATAJFR0M$PORTS: 
PROCEDURE (HIGH /LOW) WQRO; 

DECLARE (HIGH/LOW) WORD/ 

DECLARE INSPORTSHIGH WORD/* /* ADDRESS in MeCraeken's book 

DECLARE INSPORTSlJW erTE; 

DECLARE (THERM1CCUPLES0UTPUT/ TEMPERATURE) WORD; 

INSPORTSril&H = INPUT(MIGM); 

INSPQSTSLOw = INPU T (LCW); 

THERM3CDUPLESDUTPUT * SHL C INSPORTSHIGH, 3) OR INJPCRTSlDw; 

TEMPERATURE = INTERPOLATE (THERMOCOUPLESOUTPUT) ; 

RETURN TEMPERATURE," 

END TEMPSDATASFRDMSPDRTS" 

START: do; 

SETTING = TH=RMDSTAT$S=TT:nGSFROM«P0RTS(2OOO/1OD0); 
TEMPERATURE = T = MPSDAT fl 5FR0M$ Pg. RT S ( 2 00/ 1 OQ) ; 

eno start; 



END plmdata; 



mqoule information: 



CODE AREA SIZE 


= 012CH 


3003 


CONSTANT AREA SIZE 


= 0020m 


323 


VARIABLE AREA SIZE 


= 00164 


223 


MAXIMUM STACK SIZE 


= 0012H 


180 


191 LINES READ 






PROGRAM ERROR(S) 







ENO OF PL/M-86 COMPILATION 



Figure 7-2. Listing of the Modified PLMDATA Module (Cont'd.) 
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We also have to link the LARGE. LIB run-time library to this module, and locate the final 
module: 

-RUN LINK86 :F1 :PLMDAT.OBJ , : F1 : LARGE . LI B TO : F1 : P LMDAT . LNK<c r> 



-RUN L0C86 :F1 :PLMDAT.LNK RESERVE C200H TO 77FFK) TO : F1 : PLHDAT . 86<c r> 



To use the ICE-88 emulator, copy the ICE88 program from its disk onto a disk in your system 
(for example, the system disk in drive 0), and type the following command: 

-ICE88<cr> 

You can now use the ICE-88 LOAD command to load the module and its symbols: 

♦LOAD :F1 :PLMp*T. «$<rr> 
*SYMBOLS<cr> 

The SYMBOLS command displays the entire symbol table. We can start emulation with the GO 
command, specifying both a starting location and a breakpoint. We can'use the .START label 
as a starting location, and specify line #8 as a breakpoint: 

*G0 FROM .START TILL #8 EXECUTED<cr> 
EMULATION BEGUN 



EMULATION TERMINATED, CS : I P = 0781 : 0040H 

At this point, we want to change the contents of the 8088 ports so that the 
THERMOSTAT$SETTING$FROM$PORTS procedure can pick them up: 

*P0RT 2000 = ; Hundred's digit of BCD thermostat sett ; ng.<cr> 
*P0RT 1000=24 ;Tens and units of BCD setting. < ; - > 
*G0 FROM C S : I P TILL .SETTING WRITTEN<cr> 
EMULATION BEGUN 



EMULATION TERMINATED, C S : I P = 0781 : 002C H 

Note that a semicolon and comment is allowed on an ICE-88 command line. We assigned 24H to 
port 1000 to obtain a 2 as the tens digit and a 4 as the units digit (to represent a thermostat 
setting of 24 degrees Celsius). Then we resumed emulation from the program counter (PC) 
until a value was obtained for the .SETTING variable. At this point, we can check the contents 
of .SETTING: 

*W0RD ,SETTING<c-> 
WOR 0794:0024H = 0018H 

18 hexadecimal is 24 in decimal. 
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Since .SETTING is correct, we can set the contents of the other two ports and continue 
emulation: 

*P0RT 200=0 ;High order 8 bits are zero.<cr> 

*P0RT 100=66 ;Low order equal 66H, or 102 in decimal.<cr> 

*G0 FROM C S : I P TILL #43 EXECUTEO<cr> 

EMULATION BEGUN 



EMULATION TERMINATED. CS : I P = 0781 : 003 BH 
*W0RD .TEMPERATURE<cr> 
UOR 0794:0026H = 0014H 
* 

14 hexadecimal is 20 in decimal. 

We have a temperature reading of 20 degrees Celsius. 

Obviously this session only introduces the ICE-88 emulator. The ICE-88 In-Circuit Emulator 
Operating instructions forlSIS-ll Users contains both tutorial and reference information on the 
ICE-88 emulator. The similarities between DEBUG-86 and in-circuit emulators enhance their 
usefulness in software development efforts, since both provide symbolic debugging. In-circuit 

cinuiaiiOii dibvj iciS yuu ciiiuiaii? an ui yuui ^iiOiuiype **sru luiiuliuria, even inuuyii yuur pro- 
totype CPU is not installed, and even if your prototype has not been built. It is a powerful 
debugging and diagnostic tool for both the hardware and software of your final product. 



EXECUTION ENVIRONMENTS 

The Intellec Series III system provides an 8086 execution environment and operating system 
support— the support your program needs to be able to access devices and files. When you 
link the run-time support libraries to your Pascal-86 program, you are providing the software 
your program needs to "talk" to the Series III operating system. 

You can also run Pascal-86 programs in other systems, or in dedicated application 
environments, as long as you provide the run-time support software. For example, you could 
transfer your program to RAM on an SDK-86 (System Design Kit with an 8086), or to RAM on an 
iSBC 86/12A Single Board Computer system, by first using the OH86 utility described in the 
iAPX 86,88 Family Utilities User's Guide for 8086-Based Development Systems to convert the 
program to hexadecimal object format, and then using an appropriate tool to load the program 
into your execution board (the ICE-86 In-Circuit Emulator, the SDK-C86 Software and Cable 
Interface, or the iSBC 957 Interface and Execution Package). 

You could also transfer your program to ROM on an SDK-86 kit, iSBC Single Board Computer 
system, or your own custom-designed hardware, by using the Universal PROM Programmer 
(UPP) with its Universal PROM Mapper (U PM) software. 

Figure 7-3 shows possible execution paths for Pascal-86 programs. 

The Series III operating system has a standard set of primitives (service routines) that any pro- 
gram can use. Intel supplies run-time support libraries that act as an interface between your 
Pascal-86 program and the Series III system. By replacing this interface with your own custom- 
designed interface, you can use the same Pascal-86 programs on other non-Intel systems. 
With each future Intel system, Intel will supply the appropriate run-time interface so that your 
present programs will also run in future Intel systems. 
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Figure 7-3. Possible Execution Paths for Pascal-86 Programs 
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A system library is also supplied for PL/M and assembly language programs; this library (or 
set of libraries) also acts as an interface between your programs and the Series III operating 
system. By supplying your own interface, you can also use these programs on other systems. 

The Series III system was designed in this modular fashion to provide operating system sup- 
port without necessarily binding programs to that particular system. It was designed to be 
used as part of your application (as the operating environment), but it was also designed to be 
useful for the development of applications that do not need full-blown operating system sup- 
port. With several layers of interfacing between the system and your program, you can choose 
exactly how much system you want in your final application, and you can preserve your soft- 
ware investment with an eye to the future. 
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Within this index, f or ff after a page number 
meansandthe following page (or pages). 



&" continuation character, 23ff 

< >" (angle brackets) in CREDIT, 35ff 

>" (angle) prompt, 23f 

<cr>", See also RETURN key, 10, 35 

*" (asterisk) in CREDIT command area, 29f 

*" (asterisk) in pathname, 19ff 

@" in CREDIT, 30 

— ", See also prompt, 10, 13, 23 

!" in CREDIT, 35ff 

(*" and "*)" comment symbols, 42 

/*" and "*/" comment symbols, 84 

%" (percent) symbols for parameters, 25 

?M" in CREDIT, 37 

;" (semicolon) for comments, 24f 
8080/8085 processor family, 1, 22 
8085 execution environment, Preface, 22ff, 
25 

Ovuu < 



i+ Drafo^o 7f 1fi 



22ff, 25, 55, 68, 78f 
8086/8087/8088 macro assembler, 13ff, 48, 

63, 68ff 
8086/8088 Utilities, 13ff 
8087 processor, 78 
8087.LIB (Pascal-86 run-time library), 78 

8087 software emulator, 78 

86 extension, 16, 22ff, 25, 55, 79 

8088 processor, 61 

87NULL.LIB (Pascal-86 run-time library), 77f 



A switch with FORMAT command, 21 

absolute modules, 79 

actual parameter, 24 

ADD command (LIB86), 76 

add text mode (CREDIT), 31 f 

addresses, See physical memory address 

address, reference to, 48, 75ff 

Aesop, 81 

algorithm for climate control system, 42, 63 

AND operation, PL/M-86,64 

angle brackets (CREDIT), 35ff 

angle (>) prompt, 23f 

application, climate control, 2ff 

arithmetic, real, 6, 78 

array, PL/M-86, 68 

assembler, 8086/8087/8088, 13ff, 63, 68ff 



assembly language, 6, 25f, 48, 63, 68ff, 79, 82 
asterisk in CREDIT command area, 29f 
asterisk in pathname, 19ff 
ATTRIB command, 18, 21 
attributes, file, 11f, 15f, 18 



backup of text file, 16, 19,38f 

BAK extension, 16, 19, 38f 

base address, segment, 83 

BCD digits, 64ff 

binary, 83f 

binary-coded decimal digits (BCD), 64ff 

BIND control (LINK86), 78f. 81 

binding modules, 75ff, 78f 

bit-shift operations, PL/M-86, 64, 68 

black printing, 10 

block diagram of climate system, 3 

blocks, file 11, 28, 30 

blue printing, 10 

BOOLEAN command (DEBUG-86), 82ff 

BOOLEAN type, 46, 82ff 

breakpoints, debugging, 92 



carriage return, See RETURN key 
Celsius degrees, 5, 24, 63ff, 68, 94f 
character pointer (CREDIT), 32ff 
choosing software tools, 5f 
climate control application, 2ff, 41ff, 44f, 49ff, 

57ff, 63, 85ff , 92f 
CNTL-A command (CREDIT), 31 
CNTL-N (CREDIT), 32, 35 
CNTL-P (CREDIT), 32, 35 
CNTL-V (CREDIT), 28ff,32ff 
CNTL-Z (CREDIT), 30 
:CO: (console output), 39 
CODE control, PL/M-86, 68, 70ff 
collector water, solar, 42, 45f 
command area (CREDIT), 28f 
command iteration, 27, 35ff 
command mode (CREDIT), 32f 
command sequence, 25 
command sequence definition file, 24f 
commands, executing, 22ff, 25 
comment symbols — Pascal, 42 
comment symbols — PL/M, 64 
comments, semicolon, 24f 
compilations, separate, 41 
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compiler, See also Pascal-86 or PL/ M-86, 16, 

55f 
compiler controls, Pascal-86, 55f 
compiler controls, PL/ M-86, 68 
console output, 39 
continuation character (&), 23ff 
Control key, See CNTL 
Control lines, source file, 51, 56 
Controls, Pascal-86, 55f 
convert voltage to temperature, 5, 63ff , 68 
cooling methods, 3ff 
COPY command, 19ff 
copying files to disks and devices, I9ff 
CP, See character pointer 
CREATE command (LIB86), 76 
creating a text file, 28f 
CREDIT text editor, 2, 11 , 13, 16, 20, 27ff, 30ff, 

33ff, 36ff, 42 
CS extension, 25 
CS register (code segment), 83f 
CSD extension, 24f 
cursor (editing text), 28ff 
cursor movement keys, 32f 

dash, See prompt 
DATA initialization, PL/ M-86, 68 
data passing between modules, 7, 48f 
datatype, REAL (Pascal-86), 78 
data types, Pascal-86, 45f , 48f 
datatypes, PL/ M-86, 64,66 
DEBUG-86, 7, 55f, 75, 78, 81 ff, 84ff 
DEBUG control, Pascal-86, 55f, 82 
debuggers, 81 

debugging, 2ff, 5ff, 55f, 75, 78, 81ff, 84ff 
default directory (:F0:); 19ff 
default settings, compiler controls, 55 
DEFINE command (DEBUG-86), 83 
defining software, 3ff 
degrees in Celsius, 5 
DELETE command, 18ff 
deleting files, 18ff 

Determine Method procedure, 47f, 51, 86 
device names, 20f 
devices, copying files to, 19ff 
Dijkstra, E.W.,41 
DIR command, 1 0ff, 16f, 21 
directory, default (:F0:), 19ff 
directory listing, 10ff, 17 
directory specifier, See pathname 
disassembled display (DEBUG-86), 84 
disk blocks, See file blocks 
disks, See formatting disks 
disks, copying files to, 19ff 
displaying text file, 39 
drive 0, See system disk, 
See also RESET key 

E8087 emulator, 78 

E8087.LIB (Pascal-86 run-time library), 78 
editor, text (CREDIT), 2, 16, 27ff, 30ff, 33ff, 
36ff, 42 



emulation, in-circuit (ICE), 1f, 5ff, 8, 79, 92ff 

emulator, 8087, 78 

end of text, 28 

ending text editing session, 38f 

English, 5f, 27, 41 

environment, execution, 81 , 95f 

Series III operating, 77ff 
EQ (quit) command (CREDIT), 38f 
ESC (Escape) key, 29 
EVALUATE command, 83f 
EX command (CREDIT), 28, 30, 38f 
exchanger, See climate control 
exclamation point in CREDIT, 35ff 
executable programs, 75f 
executing commands and programs, 22ff, 

25,81ff 
execution environment, 8085, Preface, 22ff, 

25,81,95 

8086, Preface, 8, 16, 22ff, 25, 55, 68, 78f , 81 , 
95 
execution, interactive mode, 23ff 

non-interactive mode, 24f 

paths for Pascal-86 programs, 
95f 
execution vehicle, 81 
EXIT command (LIB86), 22FF, 25, 76 
extension, filename, 11,16, 22, 25 
extensions to standard Pascal, Intel, 55 
external procedures, 76f 
external references, 75ff 

F attribute, 12,15,18, 21 
F (Find) command (CREDIT), 34 
:F0: (default directory), 19ff 
file attributes, 11f,15f, 18 

blocks, 11,28,30 

command sequence definition, 24f 

copying to disks and devices, 19ff 

deleting, 18ff 

format (F) attribute, 12, 15, 18, 21 

input/output procedures (Pascal-86), 78 

invisible (I) attribute, 12, 18 

length, 11 

library, 76f 

listing, 16, 42, 55ff,58ff, 68,71 ff 

macro, 16 

object, See object module 

overlay, 16 

renaming, 18ff 

source, 27, 55f, 68 

system(s) attribute, 12, 14f, 18, 21 

text, 27ff 

text backup, 16, 19, 38f 

update with COPY command, 20 

write-protected (w attribute), 11 f, 18 
filename, 10ff, 15ff, 18ff, 21 ff. 24f 
filename matching, 19ff 
files, manipulate, 10, 15 

naming conventions, 15f 
final product, using, 8 
finding text, 33f 
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flexible disks, See also formatting disks, 14f 

FOR, used with DIR command, 17f 

formal parameters, 25 

FORMAT command, 13ff, 18, 21 

format files, 12,15, 18, 21 

formatting disks, 10, 13ff, 16ff, 20f 

FORTRAN-86, 5f 

FORTRAN language, 6, 27, 63f 

FROM with FORMAT command, 21 



GETDATA module, 4ff, 7, 44f, 50, 55ff, 58ff, 

66, 77, 87ff 
GetData procedure, 44, 46f, 50, 52f, 66, 87 
glitch, hidden, 81 
GO command (DEBUG-86), 83f 
GO command (ICE-88), 94 
Goethe, von, 75 
Grove, Andrews., 1,9 



hard disk subsystem, 12ff 

hardware development process, Iff, 7f 

HD COPY command, 21 

hoot nnmn See climate control 

heating methods, 3ff, 42, 45f 

hexadecimal, 83f 

hexadecimal object format, 8, 95 

hidden glitch, 81 

hiding information, 46f 

high-level languages, 2ff, 5f, 41 , 55, 63f, 69f, 

75. 79. 82 
HOME key (CREDIT), 28f, 32f 
:HP: (paper tape punch), 20 



i APX 86, 88 processor family, 1 , 7f , 22 
iCE-86. 1f, 7f. 79, 92ff. 95 
ICE-88, 1f, 7f, 79, 92ff, 95 
IDISK command, 15, 18, 21 

:_ _: .:* ..i_±: /i^i— \ -* L cu o -rn tint* 

iii-uiiuuil einuicuiuii vn->c;, n, on, o, (o, tj^n 

INCLUDE control, Pascal-86, 51, 56 

information-hiding, 46f 

input/output procedures (Pascal-86), 61 , 78 

inserting text, 28f,31f 

interactive 8086 mode, 23 

interactive execution, 23ff 

Interface, iSBC 957, 8, 95 

Software and Cable (SDK-C86), 8, 95 
interface specification, Pascal-86, 47, 49f, 51 
INTERPOLATE procedure, 66ff, 93 
invisible file attribute, 12,18 
Irene, goodnight, 54, 80, 91 
IP (instruction pointer) register, 83f 
iSBC 86/12A system, 8, 95f 
iSBC 957 Interface and Execution Package, 

8, 95f 
iSBC (Single Board Computer) System, 8, 

95f 
ISIS-II operating system, See also operating 

the Series III system, 10ff, 13ff, 16ff, 23 



J (jump) command (CREDIT), 32ff 



keyboard, 29 



L (Line) command (CREDIT), 37 

language diversity, 63 

languages, high-level, 2ff, 5f, 41 , 55, 63f, 69f, 

75, 79, 82 
LARGE control, PL/M-86, 68 
LARGE. LIB (run-time library), 77f, 94 
Led better. Huddie ("Goodnight Irene"), 54. 

80,91 
length, file, 11 
LIB extension, 16 
LIB86.86 utility, 22, 75f 
librarian utility, 22, 75f 
libraries, run-time, 14f, 23ff, 75ff, 78f, 94 
library file, 76f 

management, 2, 5ff, 16, 76 

module, 16, 75ff,78f 

of routines, 2ff, 5ff, 13, 16, 75ff, 78f 
line feed character, 29 

i:„— „»:„i~.. on on 
line: \j\ iiiXci , £.\J, ud 

line terminator (CREDIT), 29 

LINK86.86 Utility, 23f, 75ff, 78f, 81 

linkage libraries, 13ff, 16, 23ff, 75ff 

linker utility, 16, 75ff, 78f 

linking modules, 2ff, 5f, 16, 75ff, 78f 

LIST command (LIB86), 76 

listin" of PLMDATA module 71 f f 92f 

listings, program, 16, 42, 55ff, 58ff, 68, 71 ff, 

85ff, 92f 

of test modules, 57ff, 85ff, 92f 
LNK extension, 16, 79 
LOAD command (DEBUG-86), 82f 
LOAD command (ICE-88), 94 
loader, RUN, 78f 

loaders, ICE (in-circuit emulation), 79, 95 
load-time locatable (LTL) module, 78f 
LOC 86.86 utility, 16, 75ff, 79 
locatable program, 77ff 
locater utility, 16, 75ff,78f 
locating modules, 2ff, 5f, 16, 75ff, 78f 
:LP: (line printer), 20, 39 
LST extension, 16 
LTL module (load-time locatable), 78f 



M (Macro definition) command (CREDIT), 36f 

MAC extension, 16 

machine code, 69f 

macro assembler, 8086/8087/8088, 13ff, 48, 

63, 68ff 
macro, assembly language, 69f 

CREDIT, 36f 

definitions, macro assembler, 69f 

file, 16 

processor language, 69f 



101 



INDEX 



MAIN module, 4ff, 7, 41ff, 46f, 49f, 55ff, 58ff, 

63, 77f, 85f( 
main program (climate control system), 43f, 

46f,49,51ff,63,77,85ff 
MainControl (main module), 43f, 47, 49f, 51ff, 

63, 77, 82f, 85ff 
matching filenames, 19ff 
memory addresses, See also physical 
memory 

addresses, 7, 75ff, 78f 
methods, heating and cooling, 3ff, 42, 45t 
MF command (CREDIT), 37 
modular programming, 6ff, 41f, 46f, 49, 63, 

76f 
modular structure, See also modular 

programming, 77 
module, absolute, 79 

concept of, 5FF, 41 , 46f, 49 

heading, Pascal-86, 45, 49f 

LTL (load-time locatable), 78f 

names, 82f 

object, See object module 

subordinate, 41, 77 
modules, binding, 75ff, 78f 

program, 2ff, 6ff, 16. 41f, 44f. 46f. 49f, 63. 
76ff , 85ff, 92f 
monitor, 9f 
moving around in text file, 32ff 

naming conventions for files, 15f 

Nassi-Schneiderman chart, 4 

NDP(8087),78 

NOEXTENSIONS control, Pascal-86, 55 

non-interactive execution mode, 24f 

NOPRINT control, Pascal-86, 55 

numeric data processor (8087), 78 



object format, hexadecimal, 8, 95 

object module also called object file, 16, 55f, 

68, 75f 
OBJ extension, 16, 55 
octal, 83f 

offset value, base address, 83 
OH86 utility, 8, 95 
Operate System procedure, 44, 46ff, 50, 52ff, 

83f. 89 
operating environment, Series III, 77ff 
operating system procedures, 25, 78, 95 

Series III, See also operating the Series III 
system, 79, 95 

summary of, 25 
operating the Series III system, 9ff, 12ff, 15ff, 

18ft, 21ff,24f, 78 
OPERATION module, 4ff, 7, 44, 50, 55ff, 58ff, 

77, 82f, 88ff 
operation of climate system, 3ff, 44, 46f 
OR operation, PL/M-86, 64, 68 
output disk or device, 19ff 
overlay file, 16 
OV0 extension, 16 



P (switch), used with COPY, 15 
P86RNx.LIB (Pascal-86 run-time libraries), 

77f 
panic condition in climate system, 42, 44 
paper tape punch device, 20 
parameter, actual, 24 

parameter passing between modules, 7, 48 
parameters, formal and actual, 25 
parse phase, Pascal-86 compiler, 56 
PASC86.86 Compiler, 23f, 55f 
Pascal language, 5ff, 27, 39, 41 f, 45f, 48f, 55, 

63f, 65f 

record, 41, 48 
Pascal-86 Compiler and Language, 5f, 14, 23, 

25, 41ff, 45, 48f, 55f, 63f, 66, 68f, 95f 

datatypes, 45f,48f 

run-time libraries, 77ff 
pass data by reference, 7, 48f 

by value,7,48f 
pathname matching, 19ff 
pathnames, 15ff,18ff, 21 ff,24f 
percent symbols for parameters, 25 
physical memory address, 7, 75ff, 78f, 83ff 
Pidgin Pascal, 6, 27, 39f 
PL/M-86 Compiler and Language. 5f, 14, 48, 

63ff, 66ff, 69ff 

data types, 64, 66 
PLM86.86 Compiler, 68 
PL/M language, 6, 25f, 45, 63ff, 66, 69f, 79 
PLMDATA module, 68, 71 ff, 92f 
pointer, character, 32ff 
ports, input/output, 49, 61 , 64ff 
primitives, Series III operating system, 70, 

78, 95 
PRINT control, Pascal-86, 55 
printing, blue or black, 10 
printing text file, 39 
PRIVATE definitions, Pascal-86, 49f 
procedure, typed (PL/M), 64 
procedures, built-in (Pascal-86), 76f 

external, 76f 

file input/output (Pascal-86), 78 

operating system, 25 
processor, 8080/8085, Iff, 7, 61 

iAPX 86, 88 (8086 and 8088), Iff, 7, 61 

numeric data (8087), 78 
product, final, 8 
program, executable, 75f 

locatable, 77 

listings, 16, 42, 55ff, 58ff, 68, 71ff 

main (climate control system), 43f, 46f, 49, 
51 ff 

modules, 2ff, 6ff, 16, 41f, 44f, 46f, 49f, 63, 
76ff 

source statements, See also source file, 
55,85 
programmable read-only memory, 2, 8 
programming the system, 9, 70 
programs, executing, 22ff, 25 
PROGRM.86 (test version of application), 

77f, 79f, 82ff, 90f 
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PROM, See programmable read-only 

memory 
prompt, dash (— ), 10, 13, 23 
prototype, hardware, 7f , 48f , 61 , 92 
PUBLIC definitions, Pascal-86, 49f 



RAM, See random access memory 
random access memory, 8, 95 
READLN procedure (Pascal-86),-61, 76f 
read-only memory (ROM), 8, 81, 95 
real arithmetic, 6, 78 
REAL data type (Pascal-86), 78 
record, Pascal, 41, 48 
recursive, See self-reference 
reference, pass data by, 7, 48f 

to address, 48, 75ff 
references, external, 75ff 
RENAME command, 18ff 
renaming files, 18ff 
RESERVE control (LOC86), 79 
RESET key, 9f,13f 
RETURN key, 10, 12ff, 15, 20f, 28f, 35 
ROM, See read-only memory 
RPT (Repeat) key, 29 
RUBOuf key. 29 ' 

RUN command. 14, 22ff, 25, 68, 75ff, 78f, 81 
run-time libraries, 14f, 23ff, 61 , 70, 75ff, 78f, 

94f 
run-time system, See also run-time 
libraries, 76ff 



S attribute, 12, 14f, 18, 21 

S (Substitute) command (CREDIT), 34f 

screen mode (CREDIT), 32f 

scrolling text, 32f 

SDK-86, 8, 95 

SDK-88, 8, 95 

SDK-C86 Software and Cable Interface, 8, 

95 
segment base, 83 
self-reference, See recursive 
semicolon for comments, 24f, 94 
separate compilations, See also modular 

programming, 41 
Series II monitor, 9f 

Series II system, Preface 
service routines, operating system, 70, 78, 

95 
shift operations, PL/M-86, 64, 68 
SHL (shift left) operation, PL/M-86, 64, 68 
SHR (shift right) operation, PL/M-86, 64, 68 
ShutDownSystem procedure, 44, 46f, 50, 54, 

89f 
Single Board Computer (iSBC) system, 8 
size control, object module, 68 
Software and Cable Interface (SDK-C86), 8, 

95 
Software definition, 3ff , 30f 
Software development process, Iff 



Soiar collector, 2ff, 42, 45f 

Source disk, 15, 19ff 

source file or program, 27, 55f, 68 

SQ (Substitute after Query) command 

(CREDIT), 34f 
SRC extension, 16 

StartUpSystem procedure, 44, 46f, 50, 53, 89 
STEP command (DEBUG-86), 84 
stepwise refinement, 2ff 
StoreData procedure, 45f, 50, 53, 87f 
Strachey, Christopher, 63 
string, 34f 
structure, PL/M-86, 48 

of software, 4ff 
SUBMIT command, 24f 
subordinate modules, 41 , 77 
substituting text, 33f 
summary of operating system, 25 
switch used with DIR, 12, 17 
SYM keyword (DEBUG-86), 83 
symbol table (DEBUG-86), 82ff 
symbolic debugging, 5ff, 82ff 
symbols, 7, 82ff 

SYMBOLS command (DEBUG-86), 82f 
SYMBOLS command (ICE-88), 94 
System Design Kits, 8, 95f 
system climate control, 2ff, 41ff,44f, 49ff, 

55ff, 58ff, 63, 85ff, 92f 

disk, 9ff, 12ff,15ff, 21 

files, 11ff, 14,18, 21 

operation, Series III, See operating the 
Series III system 

run-time, See also run-time libraries, 76ff 

turning on, 9f 



tags (CREDIT), 32f 

tank, water (climate system application), 42, 

45f 
TD (tag delete) command (CREDIT), 32 
TE (tag for end), used in CREDIT, 32f 
teletype output, 39 

TEMP$DATA$FROM$PORTS, 66ff, 92f 
temperature conversion program, 24 
temperature data, 3f, 49, 63ff, 68 
terminator, line (CREDIT), 29 
text area (CREDIT), 28f 

creating and inserting, 28f, 31 

editing, ending session, 38f 

editor (CREDIT), 2, 16, 27ff, 30ff, 33ff, 36ff, 
42 

file, 27ff 

file backup, 16, 19, 38f 

file, displaying, 39 

file, printing, 39 

finding, 33f 

scrolling, 32f 

substituting, 33f 
thermocouple voltage, 5, 61 ff , 68 
THERMOSTAT$SETTING$FROM$PORTS 

procedure, 64ff,92ff 
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:T0: (teletype output), 39 

tools, software, 4ff,7ff 

top-down design, 2ff, 41 

TPWR (typewriter) key, 29 

TS (tag set) command (CREDIT), 32 

TT (tag for top), used in CREDIT, 32f 

turning on your system, 9f 

TXT extension, 16 

type, data, 45f, 64, 66 

TYPE definition, Pascal, 46, 48 

type, REAL (Pascal-86), 78 

typed procedure, PL/M, 64 

typeface, blue or black, 10 



UPM,See universal PROM mapper 

UPP, See universal PROM programmer 

using the system, 9 

using your final product, 8 

utilities, Series III, 2ff, 6ff, 13, 75ff, 78f 



value, pass data by, 7, 48f 
VAR definition, Pascal, 46, 49 
vehicle, execution, 81 
video display (CREDIT), 28 
voltage, thermocouple, 5, 61 ff, 68 



Universal PROM Mapper (UPM), 8, 95 
Universal PROM programmer (UPP), 2, 
uparrow(T), 29 
update files, 20 



W attribute, 11f, 18 
8, 95 wild card filename, See also filename 

matching, 21 
WRITELN procedure (Pascal-86), 61 , 76f 
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